while (<F>) {};
$c = $.;