Select Code to Download

#!/usr/bin/env perl

...
17 18 19 20
17 18 19 20
21 22 23 24

$ ./pm_11109149_reverse_file_extract_with_conds.pl 24
21 22 23 24 17 18 19 20 13 14 15 16 9 10 11 12 5 6 7 8 1 2 3 4
...

$ ./pm_11109149_reverse_file_extract_with_conds.pl 7
21 22 23 24 17 18 19