File Coverage

test.pl
Criterion Covered Total %
statement n/a
branch n/a
condition n/a
subroutine n/a
pod n/a
total n/a


line stmt bran cond sub pod time code
1             # Before `make install' is performed this script should be runnable with
2             # `make test'. After `make install' it should work as `perl test.pl'
3              
4             ######################### We start with some black magic to print on failure.
5              
6             # Change 1..1 below to 1..last_test_to_print .
7             # (It may become useful if the test is moved to ./t subdirectory.)
8              
9             BEGIN { $| = 1; print "1..1\n"; }
10             END {print "not ok 1\n" unless $loaded;}
11             use Net::FreeDB2;
12             $loaded = 1;
13             print "ok 1\n";
14              
15             ######################### End of black magic.
16              
17             # Insert your test code below (better if it prints "ok 13"
18             # (correspondingly "not ok 13") depending on the success of chunk 13
19             # of the test code):
20