in reply to How to eliminate white spaces,tabs,new lines at thestart and end of a long string ??
Or if you wanted to keep the original string for later :
$nospace = $1 if $string=~m/^\s*(\w+)\s*$/ ; print $nospace ; [download]