#! /usr/bin/perl
use Test::Spec;

use MyClass;

describe MyClass => sub {
    my $o;
    before each => sub {
        $o = 'MyClass'->new;
    };

    it 'instantiates' => sub {
        isa_ok $o, 'MyClass';
    };

    it 'returns false' => sub {
        is $o->foo(0), 'false';
    };

    it "isn't sure" => sub {
        is $o->foo(1), 'probably';
    };
};

runtests();