you never closed MAIL. close MAIL;
> -----Original Message----- > From: Yasen Petrov [mailto:[EMAIL PROTECTED]] > Sent: Monday, July 08, 2002 2:29 PM > To: [EMAIL PROTECTED] > Subject: Probably impossible > > > Hi all, > my problem is that I want to send an e-mail every day, but > when I try to > iterate, the unix perl wants to see all the iterations and > then execute them > at once, while this isn't the same on windows. This means I > can't send an > e-mail every day this way below: > > #!usr/bin/perl > use warnings; > use CGI::Carp qw(fatalsToBrowser); > > my $mailprogram = "/usr/lib/sendmail"; > my $rec = '[EMAIL PROTECTED]'; > my $i = 0; > > > while ($i < 300) > > open (MAIL,"|$mailprogram -t"); > print MAIL "To: $rec\n"; > print MAIL "From: Yasen_Petrov\n"; > print MAIL "Subject: Ads\n"; > print MAIL "Some text\n"; > sleep 60*60*24; # 24 hours > close MAIL; > $i++; > print "Content-type: text/html\n\n"; > print "You have just send an e-mail to $rec\n"; > } > > If anyone can help, I'll be very grateful. Thanks. > > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > ---------------------------------------------------------------------------- -------------------- The views and opinions expressed in this email message are the sender's own, and do not necessarily represent the views and opinions of Summit Systems Inc. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
