use Test::More qw(no_plan);

my $status = Status->new();

is  ($status->status('good'), 'good');
is  ($status->status('bad'), 'good');

package Status;

sub new {
    my $package = shift;
    my $self = {};
    bless $self, $package;
}

sub status {
    my $self = shift;
    my $status = shift;
    if ($status eq 'good') {
        return "good";
    } else {
        return "bad";
    }
}