prompt$ perl test.pl
1
2
3