Select Code to Download

$self->sis->add_event("event name");
$self->sis->log_event("message");
$self->sis->uuid();
...
sub sis {
    return Company::Dept->new($dbh, $uname);
}

sub sis {
    my ($self) = @_;
...

    return $self->{_sis};
}