How do I show status for XMLin (XML::Simple)

[Rossz]

I have a very large XML file to import then shove into MySQL. This is
all working perfectly. However, XMLin() is taking a rather long time to
import the data so I would like to show some kind of status info while
it is working. Here's a highly simplified example of the data:

<Products>
<Product>
<SKU>ABC123</SKU>
<Name>Budget Widget</Name>
... { lots more nested fields }
</Product>
</Products>

With <Product> repeated about 8000 times. I'd love to be able to dump
the sku and/or name as it is imported. Can someone point me in the
right direction?