use strict;
use warnings;

use XML::Parser;
use Text::CSV;

# Do my parsing here ... maybe 100 lines
# Do my munging here ... maybe 100 lines
# Do my writing here ... maybe 25 lines.