foreach ($string)
{
   s/^\s*//; #delete leading spaces
   s/\s*$//; #delete trailing spaces
}