report uninit variable name even in optimized cases

[perl5.git] / t / test_pl / plan_skip_all.t

#!/usr/bin/env perl -w
use strict;
use warnings;

BEGIN {
    chdir 't' if -d 't';
    push @INC, ".";
    require 'test.pl';
}

plan skip_all => "Test Test::More compatible plan skip_all => \$foo";