Add ARM files
[dh-make-perl] / dev / arm / libtest-harness-perl / libtest-harness-perl-3.12 / examples / harness-hook / hook.pl
1 #!/usr/bin/perl
2
3 use strict;
4 use warnings;
5 use lib qw( lib ../../lib );
6 use Harness::Hook;
7 use TAP::Harness;
8 use File::Spec;
9
10 $| = 1;
11
12 my $harness = TAP::Harness->new;
13
14 # Install the hook
15 Harness::Hook->new($harness);
16
17 $harness->runtests(
18     File::Spec->catfile( split( /\//, '../../t/000-load.t' ) ) );