Help for this page

Select Code to Download

Select or download this

use Data::Dumper;
$sender->MailFile(
...
warn "Unexpected addr: '$addr'" 
   unless ($addr eq 'myname@somewhere.com');
warn Dump($sender);

Select or download this
```
To: myname, @somewhere.com
```