Select Code to Download

sub validate_max_size {
    my $val = shift;
...
# Then later ...
.
my @data :Field :Type( \&package::validate_max_size );

#   Failed test 'Valid max_size: undef'
#   at (eval 4) line 43.
...
# Package: main
# File: t/IBM-Common-Collection.t
# Line: 68

perl -Mstrict -we 'sub f {my $v = shift; ! defined $v || $v > 0}; f(un
+def)'