package Bar;
use Data::Dumper;
use Moose;

sub bar
{
    my $arg = shift;