blob: d6a71e0235ee8ee938a69a8ceae2ed6f29811dd8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl test.t'
######################### We start with some black magic to print on failure.
use Test;
BEGIN { plan tests => 1; $loaded = 0}
END { ok $loaded;}
# Just make sure everything compiles
use Net::Ping;
$loaded = 1;
######################### End of black magic.
# Insert your test code below (better if it prints "ok 13"
# (correspondingly "not ok 13") depending on the success of chunk 13
# of the test code):
|
