#lie about myself
$str='i am a sexy bastard';
#split the words
@words=split ' ', $str;
#revers 'em
@words=reverse @words;
#join 'em
$reversestr=join ' ', @words;