1use Test::More; 2use strict; use warnings FATAL => 'all'; 3 4use List::Objects::WithUtils ':all'; 5 6ok __PACKAGE__->can( 'array' ), 'array ok'; 7ok __PACKAGE__->can( 'immarray' ), 'immarray ok'; 8ok __PACKAGE__->can( 'array_of' ), 'array_of ok'; 9ok __PACKAGE__->can( 'immarray_of' ), 'immarray_of ok'; 10 11ok __PACKAGE__->can( 'hash' ), 'hash ok'; 12ok __PACKAGE__->can( 'immhash' ), 'immhash ok'; 13ok __PACKAGE__->can( 'hash_of' ), 'hash_of ok'; 14ok __PACKAGE__->can( 'immhash_of' ), 'immhash_of ok'; 15 16cmp_ok []->count, '==', 0, 'autobox ok'; 17 18done_testing; 19