Select Code to Download

#!/usr/bin/perl
use warnings;
...
2 333 ssse 2222 dshg
3 444 ssws 3333 sjsh
4 555 wwsw 4444 skss

C:\Code>perl cols_print.pl
1111
2222
3333
4444