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

#!./perl -w

BEGIN {
    require './test.pl';
}

plan( tests => 2 );

is( { return 1 }->(), 1 );
is( { return 1 and 2 }->(), 2 );