print __LINE__ . ": $x\n";
my $x = 123;
print __LINE__ . ": $x\n";
my $x = 456;
print __LINE__ . ": $x\n";
my $x;
print __LINE__ . ": $x\n";