Select Code to Download

sub counttags
{
...
      print "Number of Start and End tags for element $_[0] does not m
+atch";
   }
}

sub check_tags_balance {
    my @tagstack;
...

$_ = "I assume <b>everything</b> is <i><b>ok</b></i>";
check_tags_balance();