#!/usr/bin/env perl

use strict;
use warnings;
use lib q(.);
use Karl::Fractals::Mandelbrot;
use feature qw (say);
use Data::Dump;

my $Benoit = Karl::Fractals::Mandelbrot->new();
dd $Benoit;
say $Benoit->reckon( 2, 7 );

__END__

karls-mac-mini:monks karl$ ./inline_moo.pl
bless({ height => 1024, iterations => 20, width => 1280 }, "Karl::Fractals::Mandelbrot")
1280 1024 20
14