#!/usr/bin/perl -w
use strict;
use Test::More qw/no_plan/;
ok $self->gf->nice => "Yahoo!";
ok ($self->accommodation->rent != NOT_TOO_BAD) => "Yahoo!";
ok defined($job), "Yahoo!";
ok ($job->money >= $GOOD_PAY), "Yahoo!";
TODO:
{
ok defined($plan), "Must have plan.";
ok ( @books > 2 => "Must get around to writing books.";
}