Jó az. Kicsit könnyebben érthető változat: perl -lne 'BEGIN{$/ = ":"} END{ print $. - 1}' /etc/passwd de ez meg már az awk-változat tükörfordítása. (A -l kapcsoló kivételével) Azt, hogy az a2p miért csinál hülyeséget, ne a perltől kérd számon.