[Cascavel-pm] Combate ao spam

[Luis Campos de Carvalho]

----- Original Message -----
From: "Ednardo Lobo" <ednardo em elobo.cjb.net>
Sent: Tuesday, March 25, 2003 5:31 PM


>
>     Que tal cada um de nós executarmos isso:
>
>         #!/usr/bin/perl
>         use strict;
>
>         my $s = 'Pare de enviar SPAM!!!';
>         my $t = 'stcnet em interfire.com.br';
>         for (my $i=1; $i<1001; ++$i) {
>             open MAIL,"|mail -s '$s' $t" or die $!;
>             print MAIL "Pare de enviar SPAM pelo amor de Deus!!\n";
>             close MAIL;
>         }

  Humm... posso tentar... mas infelizmente aqui tenho apenas windows...
  Talvez precise de algumas modificações...

  =-]

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
  Luis Campos de Carvalho
  Computer Science Student
  OCP DBA Oracle & Unix Sys Admin
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=