perl -ne '}{ print $.'