You could look at using File::Find::Rule and perhaps HTML::Template for seperating your "sexy" output from your Perl code.