--- AnyEvent-DBI/DBI.pm	2008/06/06 20:06:34	1.4
+++ AnyEvent-DBI/DBI.pm	2008/06/09 15:30:41	1.5
@@ -6,6 +6,23 @@
 
    use AnyEvent::DBI;
 
+   my $cv = AnyEvent->condvar;
+
+   my $dbh = new AnyEvent::DBI "DBI:SQLite:dbname=test.db", "", "";
+
+   $dbh->exec ("select * from test where num=?", 10, sub {
+      my ($rows) = @_;
+
+      print "@$_\n"
+         for @$rows;
+
+      $cv->broadcast;
+   });
+
+   # asynchronously do sth. else here
+
+   $cv->wait;
+
 =head1 DESCRIPTION
 
 This module is an L<AnyEvent> user, you need to make sure that you use and