I use this perl script
antivirus.pl
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

my $spoolname = $ENV{'SPOOLNAME'};

                @args = ("f:/Programm/Norton AntiVirus/navw32.exe", $spoolname, "/NORESULTS");

                system(@args);

                $filename = $spoolname;

                                                                open(FILE, ">>$filename") || exit(1);

                                                                binmode FILE;

                                                                #this is a cool message for publish and justify the money at the client ;-)

                                                                                    print FILE "virus free by auyama";

                                                                close FILE;

                                                                exit(0);

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
in my "mail.ini" have these
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
CGI Timeout = 80
Router CGI Script = c:/sambar53p/cgi-bin/antivirus.pl
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
what do think about this? may be usefull fast? can be a problem?
 
 
rycardo74 
 
 
-------------------------------------------------------
To unsubscribe please go to http://www.sambar.ch/list/


Reply via email to