File: 07_page.t

package info (click to toggle)
libperlanet-perl 2.2.1-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 444 kB
  • sloc: xml: 1,177; perl: 757; sh: 6; makefile: 5
file content (13 lines) | stat: -rw-r--r-- 324 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
use strict;
use warnings;
use Test::More;
use_ok('Perlanet');

# Test fetching a page without the cache trait.
ok(my $p = Perlanet->new(), 'Object created');
isa_ok($p, 'Perlanet');
ok(my $page = $p->fetch_page('http://blogs.dave.org.uk/rss.xml'),
   'Page fetched');
isa_ok($page, 'URI::Fetch::Response');

done_testing();