http://www.perlmonks.org?node_id=526155


in reply to removing space from beginning and end of sentence

Hi. Visit Tutorials and start with How to RTFM (plenty of other tutorials to help you along your way, but this one is a good start).

'perldoc -q space'

Found in perlfaq4 How do I strip blank space from the beginning/end of a string? Although the simplest approach would seem to be $string =~ s/^\s*(.*?)\s*$/$1/; not only is this unnecessarily slow and destructive, it also fails + with embedded newlines. It is much faster to do this operation in two s +teps: $string =~ s/^\s+//; $string =~ s/\s+$//; Or more nicely written as: for ($string) { s/^\s+//; s/\s+$//; } This idiom takes advantage of the "foreach" loop's aliasing behavi +or to factor out common code. You can do this on several strings at once +, or arrays, or even the values of a hash if you use a slice: # trim whitespace in the scalar, the array, # and all the values in the hash foreach ($scalar, @array, @hash{keys %hash}) { s/^\s+//; s/\s+$//; }
Simple search for remove space end yields How do I remove whitespace at the beginning or end of my string?

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.