The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# vim: ft=perl
use Ubic::Service::Common;

Ubic::Service::Common->new({
    start => sub {
        die "oops, this service can't start";
    },
    stop => sub {
        die "oops, this service can't stop";
    },
    status => sub {
        return 'broken';
    },
});