use strict;

my $str = "\n  Sugarkannan is a smart guy    \n";

$str =~ s/^\s*(.*?)\s*$/$1/;
print ">$str<\n";