You can open a pipe to qmail-inject and write to it, just like sendmail. Or you can use Email::Send::Qmail which does (some) dirty work for you.