[ViewVC] Diff of: cvs/AnyEvent-FastPing/FastPing.pm

Comparing AnyEvent-FastPing/FastPing.pm (file contents):
Revision 1.7 by root, Tue Nov 17 21:38:07 2009 UTC vs.
Revision 1.8 by root, Wed Apr 7 14:13:16 2010 UTC

 no warnings;
 use AnyEvent;
 BEGIN {
-   our $VERSION = '1.12';
+   our $VERSION = '1.13';
    our @ISA = qw(Exporter);
    require Exporter;
    #Exporter::export_ok_tags (keys %EXPORT_TAGS);
 entry for each received packet (replies are being batched for greater
 efficiency). Each packet is represented by an arrayref with three members:
 the source address (an octet string of either 4 (IPv4) or 16 (IPv6) octets
 length), the payload as passed to C<icmp_ping> and the round trip time in
 seconds.
+Example: register a callback which simply dumps the received data. Since
+the coderef is created on the fly via sub, it would be hard to unregister
+this callback again :)
+   AnyEvent::FastPing::register_cb sub {
+      for (@{$_[0]}) {
+         printf "%s %d %g\n",
+            (4 == length $_->[0] ? inet_ntoa $_->[0] : Socket6::inet_ntop (&AF_INET6, $_->[0])),
+            $_->[2],
+            $_->[1];
+      }
+   };
 Example: a single ping reply with payload of 1 from C<::1> gets passed
 like this:
    [ [
 =cut
 our @CB;
-sub register_cb(&) {
+sub register_cb($) {
    push @CB, $_[0];
 }
 sub unregister_cb($) {
    @CB = grep $_ != $_[0], @CB;

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines