1use strict; 2use warnings; 3 4package Test::Deep::ListMethods; 5 6use base 'Test::Deep::Methods'; 7 8sub call_method 9{ 10 my $self = shift; 11 12 return [$self->SUPER::call_method(@_)]; 13} 14 15sub render_stack 16{ 17 my $self = shift; 18 19 my $var = $self->SUPER::render_stack(@_); 20 21 return "[$var]"; 22} 23 241; 25