My preferred method of removing either leading or trailing white space for 
efficiency is like this:

my $fish
for ($fish) {
    s/^\s+//; s/\s+$//;
}

# if you have two vars 
for ($fish, $mamal) {
    s/^\s+//; s/\s+$//;
}

just my two cents.
See the perlsyn manpage for additional info.

Scott




---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]

Reply via email to