$ perl -Mwarnings -E 'say int($.)'
Use of uninitialized value $. in int at -e line 1.
0