Select Code to Download

use strict; 
use XML::Parser; 
...
  print "Total software packages available: ".($total_count -$total_ou
+t)."\n"; 
  print "Total cost for $total_count pieces of software: $total_cost\n
+"; 
}

<?xml version="1.0"?> 
<software_inventory> 
...
      <price>2999.00</price> 
   </package> 
</software_inventory>

***** Software Inventory Report ***** 
---------------------------------------------------
...
Total software packages purchased: 100 
Total software packages available: 60 
Total cost for 100 software packages: 4996.99

***** Software Inventory Report *****
-------------------------------------
...
Total software packages:
Total software packages available: 0
Total cost for  pieces of software: 4996.99