Reporting scripts using Perl