Select Code to Download

#!/usr/local/bin/perl

...
is_deeply [fill_in_the_blanks(qw<4 _ _ _ 5>)], [qw<4 4 4.5 5 5>], "dhu
+ang90";

done_testing;

ok 1 - ( )
ok 2 - (1)
...
ok 13 - (_ _ 1)
ok 14 - dhuang90
1..14