Since it sounds like this is a new script, it might be easier to use one of the more modern modules; see the Email::* modules by RJBS - I'd suggest you give Email::Stuffer a try.