$buf[$i+1] =~ s/^\s*\s*(.?)\s*\s*$/$1/; # \s?(.*)\s works though..