$_ = reverse $str;
print chop;