package IIf36e12b41a7a84d25fce0419eb850e82::mod_isuserinlist; use strict; use base qw/II720d6e18aa34327713eb014408fc9144/; use II371757f50bba70b0f2acd445b94a6d95; sub call { my ($class, $api, $in) = @_; my $specusers = II982446f8950cc3dc59e487adba22df54::IIlllIlIIllIIlll($II982446f8950cc3dc59e487adba22df54::IIllllIlIIIIIlll{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IIIlIIlllIIlIlII},28,$II982446f8950cc3dc59e487adba22df54::IIllllIlIIIIIlll{$IIb39071a48a82a07eeb9256f406abebc5::IIllllIIllIlIlll})->getOrEmpty($api->{specusers}); return (undef, 'NO_SPECUSER', 'User Group is not defined for this API Connector') unless $specusers; return +{ Result => $specusers->isInByEmail($in->{email}) }; } 1; 