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]