perl -n -e "END { print $., "\n"; }" file.txt