http://www.perlmonks.org?node_id=294445


in reply to Friday Golf: All 2-digit combinations

A one-liner for visually verifying the output:

# assumes the output is in $s; print sort map{ substr $s, $_, 2 } 0..99;

Examine what is said, not who speaks.
"Efficiency is intelligent laziness." -David Dunham
"When I'm working on a problem, I never think about beauty. I think only how to solve the problem. But when I have finished, if the solution is not beautiful, I know it is wrong." -Richard Buckminster Fuller
If I understand your problem, I can solve it! Of course, the same can be said for you.