Searched refs:v_plus (Results 1 - 1 of 1) sorted by relevance

/openbsd-current/gnu/usr.bin/perl/dist/if/t/
H A Dif.t6 my $v_plus = $] + 1;
23 is( eval "use if ($v_plus > \$]), strict => 'subs'; \${'f'} = 12", 12,
26 is( eval "use if ($v_plus > \$]), strict => 'refs'; \${'f'} = 12", undef,
32 is( (eval "use if ($v_plus > \$]), 'open' => IN => ':crlf'; 12" || 0), 12,
35 is(eval "use if ($v_plus > \$])", undef,
39 is(eval "no if ($v_plus > \$])", undef,

Completed in 55 milliseconds