print makeXML($id);

sub makeXML 
{return "<xxx>$_</xxx>";}