package IIe1552d35b81f0db659b4a82f6f5db468; use strict 'vars'; use base qw/II674e2407e107271bcc76478050bc636a/; use II040d1645cc3e327e8ed2b5eb9fb581ff; BEGIN{*IIe1552d35b81f0db659b4a82f6f5db468::IllIIIlIIlIllIlI=\%{pack('H6','720a6e')^'7D8'};*IIe1552d35b81f0db659b4a82f6f5db468::lIlIlIIIlIlIIlIl=\&{pack('H24','20365b246f7620000f384c71')^'MW2JULS88Z4E'};$IIe1552d35b81f0db659b4a82f6f5db468::IIlIIlllIIIlIIII=pack('H18','116e62131a70061a68')^'Y:6CE8II<';$IIe1552d35b81f0db659b4a82f6f5db468::IlIIIIIllIIlllIl=pack('H12','1b18790d0910')^'QQ7A@S'};sub dbTable     { 'jin_affinb' } BEGIN{*IIe1552d35b81f0db659b4a82f6f5db468::IlIIlIIlIIlIllll=\%{pack('H6','111705')^'TYS'};*IIe1552d35b81f0db659b4a82f6f5db468::lllIllIIlIlIlIII=\&{pack('H24','5b2850590b694f7f0f2d3104')^'6I971S<G8OI0'};$IIe1552d35b81f0db659b4a82f6f5db468::lIIIIlIIIlIIIIlI=pack('H18','00180e1f670b74146d')^'HLZO8C;G9';$IIe1552d35b81f0db659b4a82f6f5db468::IIlIIllIIllIIIIl=pack('H12','0d7c751a7112')^'G5;V8Q'};sub dbFields    { qw/ owner_id aff_id pack_id active descr html_delivery email_delivery / } BEGIN{*IIe1552d35b81f0db659b4a82f6f5db468::llIllllIllIlIlll=\%{pack('H6','1f0f60')^'ZA6'};*IIe1552d35b81f0db659b4a82f6f5db468::IIlllllllIIIlllI=\&{pack('H24','3e3322500372207761283b75')^'SRK>9HSOVJCA'};$IIe1552d35b81f0db659b4a82f6f5db468::IlIlIlIlIIlllIIl=pack('H18','0a63691e0a187f6c0e')^'B7=NUP0?Z';$IIe1552d35b81f0db659b4a82f6f5db468::IlIIIllIlIllIlII=pack('H12','1f7a02040816')^'U3LHAU'};sub get { my $this = shift()->SUPER::get(shift()); $this->{email_delivery} ||= II040d1645cc3e327e8ed2b5eb9fb581ff::IllllIIllIIIIIII($II674e2407e107271bcc76478050bc636a::IllIlIIlllllllIl{$IIe1552d35b81f0db659b4a82f6f5db468::IlllIIlIIlIIllII},8,$II674e2407e107271bcc76478050bc636a::IllIlIIlllllllIl{$II674e2407e107271bcc76478050bc636a::IIIlIIIIlIlIlIII})->getDefault('affinb_delivery'); $this; } BEGIN{*IIe1552d35b81f0db659b4a82f6f5db468::lllIlIllIllIIllI=\%{pack('H6','021719')^'GYO'};*IIe1552d35b81f0db659b4a82f6f5db468::IIIIIlllIllIllll=\&{pack('H24','3d553c5b6d6b3a6262293264')^'P4U5WQIZUKJP'};$IIe1552d35b81f0db659b4a82f6f5db468::IlllIIlIIlIIllII=pack('H18','0b151317187a7b1315')^'CAGGG24@A';$IIe1552d35b81f0db659b4a82f6f5db468::lllIIIIIIIIIlIll=pack('H12','0d070c700f05')^'GNB<FF'};sub deleteForPackage { my ($this, $package) = @_; return unless $package; $_->delete for $this->search(pack_id => $package->{id}); return; } BEGIN{*IIe1552d35b81f0db659b4a82f6f5db468::IIIlIlIlIIlIIlII=\%{pack('H6','05161d')^'@XK'};*IIe1552d35b81f0db659b4a82f6f5db468::llIIIlllIllIIllI=\&{pack('H24','3f5b382b71094d7962333e0d')^'R:QEK3>AUQF9'};$IIe1552d35b81f0db659b4a82f6f5db468::llIIllIIIIlllIIl=pack('H18','1b131c691d020b1b17')^'SGH9BJDHC';$IIe1552d35b81f0db659b4a82f6f5db468::IIIIIIIIllllIlIl=pack('H12','137f7b7b790e')^'Y6570M'};sub getHasEmailDelivery { my $this = shift; my ($headers, $body) = split /\r?\n\r?\n/, $this->{email_delivery}, 2; my %headers = map { split /\:\s*/, $_, 2 } split /\r?\n/, $headers; return ! $headers{'X-Disabled'}; } 1; 