+ $packetloss = $temp[5];
+ $roundtrip = $temp[17];
+
+ print "Paketlos->".$packetloss."<-Roundtrip->".$roundtrip."<-\n";
+
+ if ( $packetloss eq "100" ){
+ my $pingoutput = `/usr/bin/ping -w 10 -c $NUMPINGS -q ping.ipfire.org | tail -2`;
+ my @temp = split (/\/|\%|\s/, $pingoutput);
+ $packetloss = $temp[5];
+ $roundtrip = $temp[17];
+
+ print "Paketlos->".$packetloss."<-Roundtrip->".$roundtrip."<-\n";
+ }
+