Help for this page
#!/usr/bin/perl use strict; use warnings; ... for (@sorted_array) { print join("\t", @$_), "\n"; }
1 7 1 3 4 3 2 7 4 ... 5 7 25 5 6 28 6 7 36