Awk can be shorter in terms of "number of source characters" but it is more obtuse than well written Perl code. For me, that just kills awk vs Perl.