Re: TMTOWTDI Puzzle: Generating a range of numbers

[IlyaM]

in reply to TMTOWTDI Puzzle: Generating a range of numbers

My variant:

$c = 'qwertyasdf'; ($a, $b, @a) = sort map
{ $a = $_; ord chr grep $_ le $a, split //, $c }
split //, $c; print "$a @a $b\n";

Update: Removed forbiden '+' operation. Updated code even more obfuscated than it was before.

--
Ilya Martynov (http://martynov.org/)