Language Basics Perl

print __LINE__;