20test-list1.t

#!/usr/bin/env perl

use warnings;
use strict;

use File::Basename; use File::Spec;
use Test::More 'no_plan';
use lib dirname(__FILE__);
use Helper;
my $test_prog = File::Spec->catfile(dirname(__FILE__), 
				    qw(.. example test-require.pl));
Helper::run_debugger("$test_prog", 'list1.cmd');