1234567891011 use Test::More;use strict; use warnings FATAL => 'all';use Lowu;my $arr = [1, undef, 3];ok $arr->defined(0), 'boxed defined ok';ok !$arr->defined(1), 'boxed !defined ok';done_testing
use
Test::More;
strict;
warnings
FATAL
=>
'all'
;
Lowu;
my
$arr
= [1,
undef
, 3];
ok
->
defined
(0),
'boxed defined ok'
ok !
(1),
'boxed !defined ok'
done_testing