1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
## skip Test::Tabs
use Test::More;
use HTML::HTML5::Parser::UA;
eval { require LWP::UserAgent; 1; }
or plan skip_all => "Could not use LWP::UserAgent: $@";
$HTML::HTML5::Parser::UA::NO_LWP = '';
do '07ua.t' if -s '07ua.t';
do 't/07ua.t' if -s 't/07ua.t';
=head1 PURPOSE
Check that L<HTML::HTML5::Parser::UA> works with L<LWP::UserAgent>.
=head1 AUTHOR
Toby Inkster, E<lt>tobyink@cpan.orgE<gt>
=head1 COPYRIGHT AND LICENCE
Copyright (C) 2012 by Toby Inkster
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
|
