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

package ImplicitTopic;
use 5.010_00;
use strict;

sub foo {
    while (my $_ = <>) {
        say;
    }
}
1;