Check out the docs for Net::SMTP and RFC 821 for the full answer but basically. $smtp->mail('me@foo.com'); is From:me@foo.com
and $smtp->to('me@foo.com'); is....well To:me@foo.com