perl2php - question

Hi to all of you again!! I have a perl-script for sending a mail (don't ask - I *need* it for sending mails!). In perl I use it like: -- open(MAIL, "|mail.pl"); print MAIL "From: \"xx\@xx.com\" <xx\@xx.com>\n". "To: \"xx\@xx.com\" <xx\@xx.com>\n". "Subject: TEST\n\n". "This is the body";#xx@xx.xom is only example close(MAIL); $error=($? >> 8); if ($error) { print "Error: ".$error."\n";} -- 1. how to do this: open(MAIL, "|mail.pl"); print MAIL $message; close(MAIL); 2. how to do a return-value-check (in perl I get 0 if no error, 1 if an error occured in mail.pl) tanks witty -- GMX - Die Kommunikationsplattform im Internet. http://www.gmx.net -- GMX Tipp: Machen Sie Ihr Hobby zu Geld bei unserem Partner 1&1! http://profiseller.de/info/index.php3?ac=OM.PS.PS003K00596T0409a