perl字符串倒置

#!/usr/bin/perl

print "Input string: ";

$line = <stdin>;

$line = reverse ($line);

print $line;