The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package t::StupidLoop;

use strict;
use base qw( IO::Async::Loop );

sub new { return bless {}, shift; }

1;