package II71f9afe9b58cae1e8d084c31383e4b6f; use strict 'vars'; use base qw/IIf7ceb54dedce7c84ee40a47ab6f59667/; use IIf349b392e6c732ca4413d65af6e28479; use II1d17f4bae0cdcee9878216ee8bd5ec5d; BEGIN{*II71f9afe9b58cae1e8d084c31383e4b6f::IlllllIlIIllllll=\%{pack('H6','0e7310')^'K=F'};*II71f9afe9b58cae1e8d084c31383e4b6f::llIlIIlIllIlIlIl=\&{pack('H24','5b50233c690c43000e3a3e73')^'61JRS6089XFG'};$II71f9afe9b58cae1e8d084c31383e4b6f::IlIIlIIIIIlIlIlI=pack('H18','70066f0105101e1015')^'8R;QZXQCA';$II71f9afe9b58cae1e8d084c31383e4b6f::llllIIIlIIIllIll=pack('H12','02060a1f1e77')^'HODSW4'};sub feObject { IIf7ceb54dedce7c84ee40a47ab6f59667::lIlIIlIIllIIlIIl($IIf349b392e6c732ca4413d65af6e28479::lIIIllIlIIIIlIII{$IIf349b392e6c732ca4413d65af6e28479::llllIllIIllllIlI},132,$IIf349b392e6c732ca4413d65af6e28479::lIIIllIlIIIIlIII{$II1d17f4bae0cdcee9878216ee8bd5ec5d::IIIIlIlIlIlIIlIl})->getForUse('UserRegistrationForm', Zen->getRequest->getCtx->{InvitationID}) } BEGIN{*II71f9afe9b58cae1e8d084c31383e4b6f::lIIllIIlllIIllIl=\%{pack('H6','7b1707')^'>YQ'};*II71f9afe9b58cae1e8d084c31383e4b6f::llIIlIIIlllIIIlI=\&{pack('H24','2c22302a607e3d7b7e562201')^'ACYDZDNCI4Z5'};$II71f9afe9b58cae1e8d084c31383e4b6f::llIlllIllIlIIlII=pack('H18','1c6a62691208070b63')^'T>69M@HX7';$II71f9afe9b58cae1e8d084c31383e4b6f::lIlIlIllIllIllIl=pack('H12','107a021e760e')^'Z3LR?M'};sub process { my $this = shift; $this->SUPER::process; return if $this->{errors}; if (my $limit_user_reg_ip = II71f9afe9b58cae1e8d084c31383e4b6f::llIlIIlIllIlIlIl($IIf349b392e6c732ca4413d65af6e28479::lIlIllIlIllIllII{$II71f9afe9b58cae1e8d084c31383e4b6f::llIlllIllIlIIlII},47,$IIf349b392e6c732ca4413d65af6e28479::lIlIllIlIllIllII{$IIf349b392e6c732ca4413d65af6e28479::IllIlllIIIIIlIIl})->getMerchantSettings->{limit_user_reg_ip}) { if ($limit_user_reg_ip <= IIf349b392e6c732ca4413d65af6e28479::llIlIIlIlIIIIlll($IIf349b392e6c732ca4413d65af6e28479::lIIIllIlIIIIlIII{$II1d17f4bae0cdcee9878216ee8bd5ec5d::IIIIlIlllIIlllll},114,$IIf349b392e6c732ca4413d65af6e28479::lIIIllIlIIIIlIII{$II71f9afe9b58cae1e8d084c31383e4b6f::lIlIlIllIllIllIl})->getValue('count(*)', reg_ip => $ENV{REMOTE_ADDR})) { $this->addError($this->message('user.form.error.limit_user_reg_ip')); } } return; } BEGIN{*II71f9afe9b58cae1e8d084c31383e4b6f::IIIllIIIlIIIlIIl=\%{pack('H6','0f7d1b')^'J3M'};*II71f9afe9b58cae1e8d084c31383e4b6f::IIllIIlllIIIIIII=\&{pack('H24','2622535f7b7c387072562a66')^'KC:1AFKHE4RR'};$II71f9afe9b58cae1e8d084c31383e4b6f::llIIIIIllllIlIIl=pack('H18','0c07131b6d70080161')^'DSGK28GR5';$II71f9afe9b58cae1e8d084c31383e4b6f::lIlllIIIllIIIllI=pack('H12','7379197a7806')^'90W61E'};sub required { my $proto = shift; my @required = $proto->SUPER::required; if (ref($proto)) { my $hasState = grep { $_ eq 'state' } @required; my $object = $proto->getDecorated; my $cfg = Zen::Config->get('lists::states'); if ($hasState && $object->{country} && ! scalar(grep { index($_, $object->{country}) == 0 } keys %{$cfg->{main}})) { @required = grep { $_ ne 'state' } @required; } } @required; } 1; 