Even if it sounds more like a Sendmail configuration problem, than like a Perl problem, I'm interested !
Could you please explain a little more what you're trying to do...
(And give more details than just 'The script doesn't work...')
Parts of your /etc/aliases, /etc/mail/virtusertable,/etc/sendmail.cw
would be useful too....
(I assume 'standard' path, if you're not sure, your sendmail.cf could be handy to locate the files used...)
"Trying to be a SMART lamer" (thanx to
Merlyn ;-)