print SENDMAIL qq!

[blech]

!;

close(SENDMAIL) or warn "sendmail didn't close nicely";