print FH "<$tag>$_</$tag>\n";