| … | |
… | |
| 4 | |
4 | |
| 5 | =head1 SYNOPSIS |
5 | =head1 SYNOPSIS |
| 6 | |
6 | |
| 7 | use AnyEvent::HTTP; |
7 | use AnyEvent::HTTP; |
| 8 | |
8 | |
| 9 | http_get "http://www.nethype.de/", sub { print $_[1] }; |
9 | http_get "http://www.nethype.de/", sub { |
|
|
10 | my ($body, $hdr) = @_; |
|
|
11 | print "$hdr->{URL} Status: $hdr->{Status}\n"; |
|
|
12 | print $body; |
|
|
13 | }; |
| 10 | |
14 | |
| 11 | # ... do something else here |
15 | # ... do something else here |
| 12 | |
16 | |
| 13 | =head1 DESCRIPTION |
17 | =head1 DESCRIPTION |
| 14 | |
18 | |
| … | |
… | |
| 716 | } |
720 | } |
| 717 | |
721 | |
| 718 | our %IDEMPOTENT = ( |
722 | our %IDEMPOTENT = ( |
| 719 | DELETE => 1, |
723 | DELETE => 1, |
| 720 | GET => 1, |
724 | GET => 1, |
| 721 | QUERY => 1, |
725 | QUERY => 1, |
| 722 | HEAD => 1, |
726 | HEAD => 1, |
| 723 | OPTIONS => 1, |
727 | OPTIONS => 1, |
| 724 | PUT => 1, |
728 | PUT => 1, |
| 725 | TRACE => 1, |
729 | TRACE => 1, |
| 726 | |
730 | |
| … | |
… | |
| 738 | MKCOL => 1, |
742 | MKCOL => 1, |
| 739 | MKREDIRECTREF => 1, |
743 | MKREDIRECTREF => 1, |
| 740 | MKWORKSPACE => 1, |
744 | MKWORKSPACE => 1, |
| 741 | MOVE => 1, |
745 | MOVE => 1, |
| 742 | ORDERPATCH => 1, |
746 | ORDERPATCH => 1, |
|
|
747 | PRI => 1, |
| 743 | PROPFIND => 1, |
748 | PROPFIND => 1, |
| 744 | PROPPATCH => 1, |
749 | PROPPATCH => 1, |
| 745 | REBIND => 1, |
750 | REBIND => 1, |
| 746 | REPORT => 1, |
751 | REPORT => 1, |
| 747 | SEARCH => 1, |
752 | SEARCH => 1, |
