Dear list, I´m relatively new to Perl, so please be patient.
I tied to get rid of whitespace characters by the following programme:
my $i=" USEFUL ";
if ($i =~ /\s/)
{
$i =~ s/\s*//;
}
print "xxxxxxxxxx $i xxxxxxxxxx\n";
and it removes the whitespace characters in front of USEFUL, but not those
behind..
Any suggestions?
kind regards
Irene Zweimueller
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
