1 | BEGIN { $> and do { print "1..0 # skipped: will only run ping tests as root\n"; exit } } | ||
---|---|---|---|
2 | |||
1 | print "1..4\n"; | 3 | print "1..4\n"; |
2 | 4 | ||
3 | use strict; | 5 | use strict; |
4 | use Net::FPing; | 6 | use Net::FPing; |
5 | 7 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |