Help for this page

Select Code to Download


  1. or download this
    my @ping1 = split /\n/, $ping1;
    
  2. or download this
    my @ping = split /\n/, $ping;
    if (@ping > 9) {
    ...
    print "\n";
    print "$_\n" foreach @ping;
    print "\n";