There's no sub for trimming strings in perl. The best way is probably to just go ahead and bite the bullet:

my $temp = "    Hello    ";

$temp =~ s/^\s+//;
$temp =~ s/\s+$//;
[download]

You can write your own trim() function to automate this if you wish.

--
perl: code of the samurai