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 1.t' |
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
######################### |
5
|
|
|
|
|
|
|
|
6
|
|
|
|
|
|
|
# change 'tests => 1' to 'tests => last_test_to_print'; |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
use Test::More tests => 1; |
9
|
|
|
|
|
|
|
BEGIN { use_ok('Text::UberText') }; |
10
|
|
|
|
|
|
|
|
11
|
|
|
|
|
|
|
######################### |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
# Insert your test code below, the Test::More module is use()ed here so read |
14
|
|
|
|
|
|
|
# its man page ( perldoc Test::More ) for help writing this test script. |
15
|
|
|
|
|
|
|
|