The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl

use strict;
use warnings;

use lib 'lib', 't/lib';
use Test::More tests => 5;

ok 1, "$0 ***** 1";
ok 1, "$0 ***** 2";

SKIP: {
    skip "checking plan ($0 ***** 3)", 1;
    ok 1;
}

ok !exists $ENV{aggregated_current_script},
  'env variables should not hang around';
ok 1, "$0 ***** 4";
$ENV{aggregated_current_script} = $0;