Select Code to Download

#! /usr/bin/perl -w

...
  $twig->flush;
}

<towns>
  <server>
...
      <isalliancecapitalcity>1</isalliancecapitalcity>
    </towndata>
  </town>