1#!/perl
2
3use 5.010;
4use strict;
5use warnings;
6use Test::Data::Unixish;
7use Test::More 0.96;
8
9test_dux_func(
10    func => 'tail',
11    tests => [
12        {in=>[1..20], args=>{}, out=>[11..20]},
13        {in=>[1..20], args=>{items=>2}, out=>[19..20]},
14        {in=>[1..20], args=>{items=>1}, out=>[20]},
15        {in=>[1..20], args=>{items=>0}, out=>[]},
16    ],
17);
18
19done_testing;
20