2008-02-25, Monsieur Robert Meier a ecrit: > How can one count the NCSL (non-comment source lines) in a perl script? To count noncomment lines (including blank lines): egrep -cv '^[[:space:]]*#' yourscript.pl To count noncomment lines which are not blank: egrep -cv '(^[[:space:]]*#|^[[:space:]]*$)' yourscript.pl Michael