Select Code to Download

#!/usr/bin/perl
use strict;
...
  }
  print "-------------------\n\n";
 }

not ok 1 - FunkyMonk Sort
#   Failed test 'FunkyMonk Sort'
...
ok 3 - NetWallah Sort
1..3
# Looks like you failed 2 tests of 3.