#!/usr/bin/env perl

use strict;
use warnings;
use lib q(.);
use Bar;
use Foo;
use Methods qw(frobnicate);
use feature qw(say);

my $gizmo = Foo->new();
my $mojo  = Bar->new();

# dd $gizmo, $mojo;

say frobnicate($_) for
    ($gizmo, $mojo);

__END__