Select Code to Download

customer.xml

...
   <dob>3/10</dob>
   <email>frank@example.com</email>
 </customer>

nba.xml
...
<player><name>Sprewell, Latrell</name><g>69</g><ppg>19.2</ppg><rpg>4.5
+</rpg><apg>4.0</apg><blk>15</blk></player>
<player><name>Ewing, Patrick</name><g>49</g><ppg>14.6</ppg><rpg>10.0</
+rpg><apg>1.0</apg><blk>68</blk></player>
</stats>

supplier.xml
...
 </supplier>
</supplier-data>

use strict;
...
print "HTTP POST error code: ", $resp->code, "\n";
print "HTTP POST error message: ", $resp->message, "\n";
}

#!/usr/bin/perl
...
    
}