Select Code to Download

<LOC><HNO></HNO><STN>Eagle Way</STN><MCN>Gotham City</MCN></LOC>

#!/usr/local/bin/perl -w

...
my %tmp = $parse->($address);

print "$parse->($address)";