open my $tmp, '<', $tmpfile ....