Help for this page
$ perl cool.pl ... My output from the script Total lines in cool.pl: 37
echo "$(egrep -v "^#" script.pl) - $(egrep "#" script.pl)" | bc