--- AnyEvent/eg/connect 2008/05/24 17:06:10 1.2 +++ AnyEvent/eg/connect 2008/05/24 23:34:28 1.3 @@ -23,7 +23,7 @@ $hdl->push_write ("GET / HTTP/1.0\015\012\015\012"); - $hdl->push_read_line (sub { + $hdl->push_read (line => sub { my ($hdl, $line) = @_; print "Yay, got line: $line\n"; $cv->broadcast;