It sounds like you need to use File::List in order to get a list of files in the directory.
Once you have this, then you can use the $msg->attach call any number of times to add the files to your message.
Hope this helps: but File::List is really easy to use, and it won't require too much re-work of your script.