Initial Commit

database/perl/lib/Test/Deep/ListMethods.pm

@@ -0,0 +1,24 @@
+use strict;
+use warnings;
+
+package Test::Deep::ListMethods;
+
+use base 'Test::Deep::Methods';
+
+sub call_method
+{
+  my $self = shift;
+
+  return [$self->SUPER::call_method(@_)];
+}
+
+sub render_stack
+{
+  my $self = shift;
+
+  my $var = $self->SUPER::render_stack(@_);
+
+  return "[$var]";
+}
+
+1;