Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"my @unsorted = (1, 10, '-', 2, -3, 20, '-', '-', 3, 0, 2, 11, 8, 7);
...
- - - -3 0 1 2 2 3 7 8 10 11 20
reversed: 20 11 10 8 7 3 2 2 1 0 -3 - - -
still unsorted: 1 10 - 2 -3 20 - - 3 0 2 11 8 7