Hallo OJ,
wenn Du nur diese eine Zeile austauschen willst, mußt Du ein anderes (Kommandozeilenfähige) Mail-Programm verwenden. Neben dem schon von Rolf erwähnten blat gibt es auch divesre sendmail-Substitute. Allerdings habe ich keine Ahnung, ob und wie die unter Windows98 läuft.
Falls Du damit experimentieren willst, hier die URL:
Sendmail für Windows:
http://www.dynamicstate.com/sendmail.htm (Shareware, $49)
ntsendmail:
http://www.ntsendmail.com/index.html
Portabler und ohne Sendmail oder Substitute gibt es unter Perl mehrere Möglichkeiten Mails zu versenden.
Ich zitiere hier mal ein paar Zeilen aus der ActiveState Perl-Doku:
mit dem Modul Net::SMTP
use Net::SMTP;
$smtp = Net::SMTP->new('here.com'); # connect to an SMTP server
$smtp->mail( 'user@here.com' ); # use the sender's address here
$smtp->to('user@there.com'); # recipient's address
$smtp->data(); # Start the mail
# Send the header.
$smtp->datasend("To: user@there.com\n");
$smtp->datasend("From: user@here.com\n");
$smtp->datasend("\n");
# Send the body.
$smtp->datasend("Hello, World!\n");
$smtp->dataend(); # Finish sending the mail
$smtp->quit; # Close the SMTP connection
mit dem Modul Mail::Sender
use Mail::Sender;
$sender = new Mail::Sender {smtp => 'mail.yourdomain.com',
from => 'your@address.com'};
$sender->MailFile({to => 'some@address.com',
subject => 'Here is the file',
msg => "I'm sending you the list you wanted.",
file => 'filename.txt'});
Eine weitere etwas esoterische Möglichkeit unter WIN98 wäre es, WIN32::OLE zu verwenden um Outlook direkt anzusprechen - was die nicht-Portabilität des Codes garantieren würde...
Gruß,
Thorsten