my @ips = split(/ /,$line); # in $line steht die Zeile mit den IPs
print "Es sind ",scalar(@ips)," IPs\n"; # scalar() liefert die Anzahl der Elemente