File Coverage

blib/lib/WebService/PutIo/URLs.pm
Criterion Covered Total %
statement 3 5 60.0
branch n/a
condition n/a
subroutine 1 3 33.3
pod 2 2 100.0
total 6 10 60.0


line stmt bran cond sub pod time code
1             package WebService::PutIo::URLs;
2              
3 1     1   653 use base 'WebService::PutIo';
  1         3  
  1         1311  
4              
5             my $class='urls';
6              
7 0     0 1   sub analyze { shift->request($class,'analyze',@_); }
8 0     0 1   sub extracturls { shift->request($class,'extracturls',@_); }
9              
10             =head1 NAME
11              
12             WebService::PutIo::URLs - Analyze URLs
13              
14             =head1 SYNOPSIS
15              
16             use WebService::PutIo::URLs;
17             my $urls=WebService::PutIo::URLs->new(api_key=>'..',api_secret=>'..');
18             my $res=$urls->analyze;
19             foreach my $url (@{$res->urls}) {
20             print "Got ". Data::Dumper($url);
21             }
22              
23             =head1 DESCRIPTION
24              
25             Methods to analyze urls for use with put.io
26              
27             =head1 METHODS
28              
29             =head2 analyze
30              
31             Returns an array of urls that Put.io can fetch
32              
33             =head3 Parameters:
34              
35             =over 4
36              
37             =item urls
38              
39             =back
40              
41             =head2 extracturls
42              
43             Returns an array of urls
44              
45             =head3 Parameters:
46              
47             =over 4
48              
49             =item txt
50              
51             =back
52              
53             =head1 COPYRIGHT AND LICENSE
54              
55             Copyright (C) 2010, Marcus Ramberg.
56              
57             This program is free software, you can redistribute it and/or modify it under
58             the terms of the Artistic License version 2.0.
59              
60             =cut
61              
62             1;