my $old_text = new MUCParser; $old_text->parse("old_file.html"); print "before\n" print $old_text->num_of_tags()."\n"; my $new_text = new MUCParser; $new_text->parse("new_file.html"); print "after\n"; print $old_text->num_of_tags()."\n"; print $new_text->num_of_tags()."\n"; #### before 602 after 397 397