Re: TMTOWTDI Puzzle: Generating a range of numbers

[jynx]

in reply to TMTOWTDI Puzzle: Generating a range of numbers

How about a mysterious tack?

The first is my favorite, and doesn't remotely work under warnings or strict. The second is a recusive solution for fun. The third is the trivialization of both solutions.

   #1
   $$_=~/((((((((((.))))))))))/for length$"..length$"x($^F<<$^F).$"x$^
+F;
   print map$_.$",sort{chr($a)cmp chr($b)}grep!($|eq$_)&&/\d/,keys%::


   #2
   sub r{
     ($_,$a)=@_;$;=join'',/(.)/,$_;print$",length;r($;,$a)if!(length$;
+eq$a)
   }
   r$",length$"x($^F<<$^F).$"x$^F.$"


   #3
   print $_ for length$"..length$"x($^F<<$^F).$"x$^F

Thanx for the fun,
jynx

update: d'oh, atcroft beat me to recursion...
update2: reformatted, hopefully it looks better