The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

SIAM::Contract - Contract object class

SYNOPSIS

   my $all_contracts = $siam->get_all_contracts();
   my $user_contracts =
       $siam->get_contracts_by_user_privilege($user, 'ViewContract');

   my $services = $contract->get_services();

METHODS

get_services

Returns arrayref with SIAM::Service objects