HOME


5h-3LL 1.0
DIR: /usr/share/doc/perl-Test-Simple/t/Test2/behavior
/usr/share/doc/perl-Test-Simple/t/Test2/behavior/
Upload File:
Current File : /usr/share/doc/perl-Test-Simple/t/Test2/behavior/err_var.t
use strict;
use warnings;

use Test2::IPC;

use Test2::Tools::Tiny;

{
    local $! = 100;

    is(0 + $!, 100, 'set $!');
    is(0 + $!, 100, 'preserved $!');
}

done_testing;