14:00 >perl 1020_SoPW.pl
line 3: $. is 3: p is 1
line 4: $. is 4: p is 2
line 5: $. is 5: p is 3E0

14:00 >