Unable to create sub named "" at /usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi/AnyEvent.pm line 1488.

##</code><code>##

my $inotify = new Linux::Inotify2 or die "unable to create new inotify object: $!";

# add watchers --watch the snmptrapd.log file
$watchObject = $inotify->watch ("/var/log/snmptrapd.log", IN_MODIFY, \&processTrap);

$inotify_w = AnyEvent->io (
                           fh => $inotify->fileno,
                           poll => 'r',
                           cb => sub {
                                      $inotify->poll ;
                                     },
                          );

MainLoop;

##</code><code>##

$inotify_w= AnyEvent->io (...