in reply to SEI Perl book?

At work, we implemented the most severe recommendation from the site, because our customers insisted on it. Nevertheless, we only use the output of their Perl::Critic rules as recommendations only, because we don't agree with some of them. So, I'm not sure it's worth the effort.

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