diff options
| author | franck cuny <franck@lumberjaph.net> | 2009-11-27 10:19:54 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2009-11-27 10:19:54 +0100 |
| commit | ad94062c6eda235a8b5b4274b3dbfa493b10557b (patch) | |
| tree | 31f8bf5c36133d81bfa84aa8057ce6d52a312ac8 /t/lib | |
| parent | add more test with different api (diff) | |
| download | net-http-api-ad94062c6eda235a8b5b4274b3dbfa493b10557b.tar.gz | |
new tests
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/WoWArmory.pm | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/t/lib/WoWArmory.pm b/t/lib/WoWArmory.pm new file mode 100644 index 0000000..c2715d1 --- /dev/null +++ b/t/lib/WoWArmory.pm @@ -0,0 +1,25 @@ +package WoWArmory; +use Moose; +use MooseX::Net::API; +use LWP::UserAgent; + +net_api_declare wowarmory => ( + base_url => 'http://eu.wowarmory.com/', + format => 'xml', + format_mode => 'append', + useragent => sub { + my $ua = LWP::UserAgent->new; + $ua->agent( + "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.1) Gecko/20061204 Firefox/2.0.0.1" + ); + return $ua; + }, +); + +net_api_method character => ( + method => 'GET', + path => '/character-sheet', + params => [qw/r n/], + required => [qw/r n/], +); +1; |