in reply to Chmod a+x a file in Perl

File::chmod supports symbolic modes, too.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]