perl script. Regular expressions for searching and replacing strings

Question

Perl

for( $st ){
s/^\s+//; #What exactly
s/\s+$//; #do these lines
}

Answer 1

Remove whitespace characters (\s+) from the beginning (^) and end ($) of a string.