my $tree = HTML::TreeBuilder->new(); $tree->parse_file($daactualfile); $tree->objectify_text(); open OUT,"> $output_temp_file" or die "cannot open $output_temp_file $!\n"; $tree->dump(*OUT); close OUT;