Select Code to Download

C:\>perl -e"$!=122;warn $!; $!=333;warn $!; die int $!"
Unknown error at -e line 1.
Unknown error at -e line 1.
333 at -e line 1.