use Test::More 'no_plan';

my $status = Status->new;
my ($stderr, $stdout);

{
  local(*STDERR, *STDOUT);
  open STDERR, ">", \($stderr = "");
  open STDOUT, ">", \($stdout = "");

  $status->status("good");
}
ok( ($stderr eq "") and ($stdout =~ /good status/) );

###

{
  local(*STDERR, *STDOUT);
  open STDERR, ">", \($stderr = "");
  open STDOUT, ">", \($stdout = "");

  $status->status("bad");
}
ok( ($stderr =~ /bad status/) and ($stdout eq "") );