my @events;
is(epoll_wait($epfd, 100, 10000, \@events), 1, 'epoll_wait returns');
-is_deeply(\@events, [ [ fileno($w), EPOLLOUT ] ], 'got expected events');
+is(scalar(@events), 1, 'got one event');
+is($events[0]->[0], fileno($w), 'got expected FD');
+is($events[0]->[1], EPOLLOUT, 'got expected event');
close $w;
is(epoll_wait($epfd, 100, 0, \@events), 0, 'epoll_wait timeout');