--- IO-AIO/AIO.pm	2006/11/08 01:59:58	1.93
+++ IO-AIO/AIO.pm	2006/11/08 02:01:02	1.94
@@ -7,7 +7,8 @@
  use IO::AIO;
 
  aio_open "/etc/passwd", O_RDONLY, 0, sub {
-    my ($fh) = @_;
+    my $fh = shift
+       or die "/etc/passwd: $!";
     ...
  };
 
@@ -101,7 +102,7 @@
 
    # queue the request to open /etc/passwd
    aio_open "/etc/passwd", O_RDONLY, 0, sub {
-      my $fh = $_[0]
+      my $fh = shift
          or die "error while opening: $!";
 
       # stat'ing filehandles is generally non-blocking