Witam, juz ten problem poruszałem wcześniej, ale tylko jedna osoba napisała że php nie ma nic wspólnego z perl'em, ale niestety problem pozostał, a przecieź ktoś taki komunikat w w skrypcie wstawił; wiec przy próbie wykonania skryptu jest komunikat: EEediot net &mask != net EEediot net &mask != net EEediot net &mask != net .. dla każdego klienta który ma zostać opisany. sprawdziłem wiele różnych wariantów ale nie mogę wpaść na trop. może kawałek skryptu :
sub matchip($$$) { my ($ip,$net,$mask) = @_; my $prefix = mask2prefix($mask); my $bmask = 2**32 <<(32-$prefix); my @net = split('.',$net,4); my $bnet = dotquad2u32($net); if(($bnet & $bmask)!= $bnet) { print "EEediot net &mask != net\n"; return 1==0
może ktoś pomoże co on sprawdza ?
Tomasz Ośko comp.vision@wp.pl