Revision as of 11:44, 2 December 2009 (view source) 187.37.67.244 (talk) (added perl implementation) ← Older edit		Revision as of 19:24, 2 December 2009 (view source) 164.67.235.176 (talk) (→‎{{header\|Perl}}) Newer edit →
Line 187: if($ent !~ m/^[1-9] [1-9] [1-9] [1-9]$/){ print "invalid input\n"; next } @n = split / /,$ent; permute { push @numbers,join ' ',@_ }@n; for $format (@formats) { ~~$format = $_;~~ for(@numbers) {

24 game/Solve: Difference between revisions

24 game/Solve (view source)