Select Code to Download

for (
      my $i=0;        # start with this value of $i
...
    ) {
   print "$sorted[$i]\n";   # print element number $i
}