in reply to Re: (Golf) Ordered Combinations
in thread (Golf) Ordered Combinations
Hi, i am trying following script to create 9 letter combination but not works...waiting for 8 hours but my computer keep no result. but 7 letter is still ok.
Can someone help me to solve the issue?
#!/usr/bin/perl
sub c {my$n=-1+shift;$n?map{my$c=$_;map$c.$_,c($n,@_)}@_:@_};
print join " ", c qw(9 a b c d e f g h i);
print "\n";
In Section
Obfuscated Code