Non devi metterlo in un altro file, ma in una varibile, che deve contenere tutto il file.

Quindi:
my $tuttofile = '';
while(<> ) {
$tuttofile += $_;
}

$tuttofile =~ s/<.*?>//gs;