Select Code to Download

#!/usr/bin/perl

...
);
$twig->parse('<?xml version="1.0"?><stats><tm tmclass="ibm" tmowner="I
+BM Corporation" tmtype="reg" trademark="AIX">AIX</tm></stats>');

#declare a global:
my $only_one=0;
...


                </stats>