#!/usr/bin/perl
-# This is automatically generated by author/import-moose-test.pl.
-# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
-use t::lib::MooseCompat;
use strict;
use warnings;
-
+no warnings 'once'; # work around 5.6.2
{
package Foo;
my $self = shift;
my ($igd) = @_;
- print $igd;
+ print $igd || 0, "\n";
}
}
my $self = shift;
my ($igd) = @_;
- print $igd;
+ print $igd || 0, "\n";
}
__PACKAGE__->meta->make_immutable;