print __LINE__, "\n"; print __LINE__, "\n"; my $number = __LINE__; print $number, "\n"; #### 1 2 3