Hi All

When I run this code it will execute the first do statement but does not 
execute the 2.3.4 do statment but it show me no errors I can see no errors 
can you help
        while ( <filein> )
                {
                        unless ($return = do $udpport137)
                        {
                                warn "couldn't parse $udpport137 : $@"  if $@;
                                warn "couldn't do file $udpport : $!"   unless defined 
$return;
                                warn "couldn't run $udpport137" unless $return;
                        }
                        unless ($return = do $netbios)
                        {
                                warn "couldn't parse $netbios : $@"     if $@;
                                warn "couldn't do file $netbios : $!"   unless defined 
$return;
                                warn "couldn't run $netbios"    unless $return;
                        }
                        unless ($return = do $icmpalert)
                        {
                                warn "couldn't parse $icmpalert : $@"   if $@;
                                warn "couldn't do file $icmpalert : $!" unless defined 
$return;
                                warn "couldn't run $icmpalert"  unless $return;
                        }
                        unless ($return = do $getglobal)
                        {
                                warn "couldn't parse $getglobal : $@"   if $@;
                                warn "couldn't do file $getglobal : $!" unless defined 
$return;
                                warn "couldn't run $getglobal"  unless $return;
                        }
more code follows but that works.
-- 
Thank You



Benjamin Jeeves

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to