my @old_ARGV = @ARGV;
my $count;
$count++ while <>;
print "COUNT = $count\n";

@ARGV = @old_ARGV;

print while <>;