Source

p5-scalar-does / t / 09warnings.t

1
2
3
4
5
6
7
8
use Test::More;
use Test::NoWarnings;

$^W = 1;
require Scalar::Does;
Scalar::Does::does(undef, 'ARRAY');

done_testing(1);