use strict;
use warnings;
use Test2::IPC;
BEGIN { require "t/tools.pl" };
{
local $! = 100;
is(0 + $!, 100, 'set $!');
is(0 + $!, 100, 'preserved $!');
}
done_testing;
use strict;
use warnings;
use Test2::IPC;
BEGIN { require "t/tools.pl" };
{
local $! = 100;
is(0 + $!, 100, 'set $!');
is(0 + $!, 100, 'preserved $!');
}
done_testing;