my $lang = $self->lang;
$lang = 'en' if !$lang;
-my $h = new FileHandle;
+my $h = new IO::File;
if (!open($h, "$main::localcmd/Commands_$lang.hlp")) {
if (!open($h, "$main::cmd/Commands_$lang.hlp")) {
}
my $in;
+$line = 'help' unless $line;
$line =~ s/\W//og; # remove dubious characters
my $include;