Re: ofidus

From: Petr Snajdr <snajdr@PVT.NET>
Subject: Re: ofidus
Date: Fri, 16 Aug 1996 14:44:16 +1030

Next Article (by Subject): Re: ofidus Matus Uhlar
Previous Article (by Subject): Re: ofidus Jan Sulc
Top of Thread: ofidus ofidus@CPRESS.CZ
Next in Thread: Re: ofidus Matus Uhlar
Articles sorted by: [Date] [Author] [Subject]

Radomir Palovsky wrote:

> Vazeni,
>
> umite napsat skriptik, ktery by jednoduse v UNIXovem prostredi vytvoril
> 100 krat (1000 krat) reply, a odeslal jej zpet siritelum podobnych bulk
> mail. Uvitam.
>
> Diky

#!/usr/bin/perl

sub mail
 {
  open MAIL, "|/bin/mail -s \"$_[1]\"  $_[0]";
  shift; shift;
  print MAIL @_;
  close MAIL;
  }

$email='ofidus@cpress.cz';              #e-mailova adresa
$subject='Neprehanite to ???';          # subject dopisu
$telo ='Tohle je napsano v tele mailu'; # telo dopisu
$tm=10;                                 # mezicas pri odesilani v sec.
$kolikrat=100;                          # kolikrat odeslat

$x=0;
while ($x<$kolikrat)
 {
 $x++;
 sleep $tm;
 &mail($email,$subject,$telo);
 }

--
S pozdravem
   Petr Snajdr
      tel.05 /72 69 303

Go to listserv.cesnet.cz LWGate Home Page.