I wrote a silly program to see what was happening.. and it doesnt seem
to be default perl (perse)


!/usr/bin/perl
#
# this is a silly test of vscan
#
open(SCANNER, "/etc/iscan/vscan -za -a /tmp/eicar*  2>&1|");
while (<SCANNER>) {
 $msg .= $_
}
close(SCANNER);
print $? . "\n";
print $msg . "\n";
[EMAIL PROTECTED] root]# vi /usr/bin/mimedefang.pl 
[EMAIL PROTECTED] root]# vi shoo.pl 
[EMAIL PROTECTED] root]# cp shoo.pl /tmp/
[EMAIL PROTECTED] root]# chmod 777 /tmp/shoo.pl 
[EMAIL PROTECTED] root]# /tmp/shoo.pl 
768
[EMAIL PROTECTED] root]# su -s /bin/bash defang
bash-2.05b$ /tmp/shoo.pl 
768

However mimedefang.pl prints out an $? of 2x that so I am wondering if a
module could alter things?

-- 
Stephen John Smoogen            [EMAIL PROTECTED]
Los Alamos National Lab  CCN-5 Sched 5/40  PH: 4-0645
Ta-03 SM-1498 MailStop B255 DP 10S  Los Alamos, NM 87545
-- You should consider any operational computer to be a security problem --

_______________________________________________
Visit http://www.mimedefang.org and http://www.canit.ca
MIMEDefang mailing list
[EMAIL PROTECTED]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang

Reply via email to