perl -le 'open FILE, "/etc/passwd"; @_=; print $.' #### perl -lne 'END{print $.}' /etc/passwd