perl -ne END{print$.} file