summary refs log tree commit diff
path: root/lib/MooseX/UserAgent
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2009-06-25 11:02:02 +0200
committerfranck cuny <franck@lumberjaph.net>2009-06-25 11:02:02 +0200
commit1626580443d469406df1312f1cc4050403f179e0 (patch)
treea3c6cb2eac1c21229332b8c9c0bf6b0f19e4ad3c /lib/MooseX/UserAgent
parentsplit components in roles, start to update POD (diff)
downloadmoosex-useragent-1626580443d469406df1312f1cc4050403f179e0.tar.gz
async useragent
Diffstat (limited to '')
-rw-r--r--lib/MooseX/UserAgent/Async.pm37
1 files changed, 37 insertions, 0 deletions
diff --git a/lib/MooseX/UserAgent/Async.pm b/lib/MooseX/UserAgent/Async.pm
index 4adcf9a..3c9a09d 100644
--- a/lib/MooseX/UserAgent/Async.pm
+++ b/lib/MooseX/UserAgent/Async.pm
@@ -32,3 +32,40 @@ sub fetch {
 }
 
 1;
+
+__END__
+
+=head1 NAME
+
+RTGI::Role::UserAgent::Async - Fetch an url using AnyEvent::HTTP 
+
+=head1 SYNOPSIS
+
+    package Foo;
+
+    use Moose;
+    with qw/MooseX::UserAgent::Async/;
+
+    has useragent_conf => (
+        isa     => 'HashRef',
+        default => sub {
+            { name => 'myownbot', };
+        }
+    );
+
+    my $res = $self->fetch($url, $cache);
+    ...
+    my $content = $self->get_content($res);
+
+=head1 DESCRIPTION
+
+=head1 BUGS AND LIMITATIONS
+
+=head1 AUTHOR
+
+franck cuny  C<< <franck@lumberjaph.net> >>
+
+=head1 LICENCE AND COPYRIGHT
+
+Copyright (c) 2009, RTGI
+All rights reserved.