void context map is satan (he says)

Author: iamalnewkirk

bin/plx

@@ -301,7 +301,7 @@ use File::Spec::Functions 'catfile';
 
 my $in = $ARGV[0] || '.*';
 
-map say(basename($_)), grep /$in/, map glob(catfile($_, '*')), grep -d, qw(
+say(basename($_)) for grep /$in/, map glob(catfile($_, '*')), grep -d, qw(
   ./bin
   ./dev
   ./local/bin