perl6 -e ".say for dir.classify(*.extension).values».basename" perl6 -e ".basename.say for dir.sort(*.extension)"