print __LINE__, "\n";
print __LINE__, "\n";
my $number = __LINE__;
print $number, "\n";