use MIME::Lite; sub MIME::Lite::send { # do whatever here, but you can't call back to the 'real' MIME::Lite::send }