$string =~ s/^\s+//;       # ltrim
$string =~ s/\s+$//;       # rtrim
$string =~ s/^\s+|\s+$//g; # trim