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

package only_once;

our $count;
$count++;

die if $count > 1;

1;