Select Code to Download

<Project>
   <Contacts>
...
      </Contact>
   </Contacts>
</Project>

#!/usr/bin/perl -w

...
print "\n";
print $WebPage->end_html;
print "\n";