$_ = 1234;
$_ = reverse $_;
chop;
$_ = reverse $_;
print
__END__
234