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: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to