C:\>perl -e"die int undef"
0 at -e line 1.