The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

AARONRP / List-Flat-0.001_003 / t / withrefutil.t 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13

              
use strict;
use Test::More 0.98;
use List::Flat(qw/flat flat_f flat_r/);
diag('Use Ref::Util for checking array references');
unless ( eval { require Ref::Util; 1 } ) {
    plan skip_all => 'No Ref::Util';
}
require './t/lib/list_flat.pl';
done_testing;