package II846d50f65426bdd259f0c88c32d3bf22; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; BEGIN{*II846d50f65426bdd259f0c88c32d3bf22::IIIllIIIlIlIlIlI=\%{pack('H6','0e0b00')^'KEV'};*II846d50f65426bdd259f0c88c32d3bf22::IIIIlIlIlIllllII=\&{pack('H24','5726595f7b04276d77542c70')^':G01A>TU@6TD'};$II846d50f65426bdd259f0c88c32d3bf22::lllllIllIIIllIIl=pack('H18','740314096a1c0f1d0c')^'<W@Y5T@NX';$II846d50f65426bdd259f0c88c32d3bf22::lIIlllIlIllIlIlI=pack('H12','0d130a1d0374')^'GZDQJ7'};sub fields    { qw/alias url admin_notes/ } BEGIN{*II846d50f65426bdd259f0c88c32d3bf22::lIlIIlIlIIlllIIl=\%{pack('H6','120a19')^'WDO'};*II846d50f65426bdd259f0c88c32d3bf22::IIlllIllIlIllIIl=\&{pack('H24','385d5d3f6c7a3d6b07202008')^'U<4QV@NS0BX<'};$II846d50f65426bdd259f0c88c32d3bf22::IIIIIlIIIllllIII=pack('H18','1e176a1b6e00021314')^'VC>K1HM@@';$II846d50f65426bdd259f0c88c32d3bf22::IIIlIIlIIlIIlIIl=pack('H12','7505707d0303')^'?L>1J@'};sub required  { qw/alias url/ } BEGIN{*II846d50f65426bdd259f0c88c32d3bf22::IIlllIIIlIlllllI=\%{pack('H6','177805')^'R6S'};*II846d50f65426bdd259f0c88c32d3bf22::llIlIllllIlIIlII=\&{pack('H24','2f20205b0c7248697a503564')^'BAI56H;QM2MP'};$II846d50f65426bdd259f0c88c32d3bf22::llllIlllIIIIIIIl=pack('H18','7e6467646f7a156014')^'603402Z3@';$II846d50f65426bdd259f0c88c32d3bf22::llIIlllllIlIllIl=pack('H12','0f1108711b7c')^'EXF=R?'};sub namesResourcePrefix { 'field.short_url' } __PACKAGE__->standardHandler($_, $_ => 'textarea(7,50)') for qw/admin_notes/; BEGIN{*II846d50f65426bdd259f0c88c32d3bf22::lIlIIIIIIIlIlIII=\%{pack('H6','7e1d1a')^';SL'};*II846d50f65426bdd259f0c88c32d3bf22::lIIllIlIlIlIIIlI=\&{pack('H24','255a5b5c7275470f65242a08')^'H;22HO47RFR<'};$II846d50f65426bdd259f0c88c32d3bf22::lllIIllllIIllllI=pack('H18','0e6968181a791c6564')^'F=<HE1S60';$II846d50f65426bdd259f0c88c32d3bf22::lIllIIIIIlIlIIII=pack('H12','07037e151a05')^'MJ0YSF'};sub setAlias { my $this = shift; my $v = shift; my $object = $this->getDecorated; $object->{alias} = $v; $this->addError($this->message('short_url.form.error.invalid_alias')) unless $v =~ m!^\w[\w\-\./]*$!; return; } BEGIN{*II846d50f65426bdd259f0c88c32d3bf22::IllllllllllIlllI=\%{pack('H6','1d0319')^'XMO'};*II846d50f65426bdd259f0c88c32d3bf22::IllIIIIIIIlllIll=\&{pack('H24','34582522777b450d7e2d3674')^'Y9LLMA65ION@'};$II846d50f65426bdd259f0c88c32d3bf22::IIIIlIIIIlllIIlI=pack('H18','0b1368116304080567')^'CG<A<LGV3';$II846d50f65426bdd259f0c88c32d3bf22::IIIllIlIlIIlIlIl=pack('H12','7210197d7012')^'8YW19Q'};sub setUrl { my $this = shift; my $v = shift; my $object = $this->getDecorated; $object->{url} = $v; $this->addError($this->message('short_url.form.error.invalid_url')) if $v && $v !~ m!^https?://! || $v =~ m![\s\t]!; $this->addError($this->message('short_url.form.error.forbidden_url')) if index($v, II3562149e53818b6637b38680e87ba918::IIIlIlllIIlIIIIl($II846d50f65426bdd259f0c88c32d3bf22::lIlIIlIlIIlllIIl{$II3562149e53818b6637b38680e87ba918::lIIIIllllIIlIIIl},47,$II846d50f65426bdd259f0c88c32d3bf22::lIlIIlIlIIlllIIl{$II846d50f65426bdd259f0c88c32d3bf22::lIIlllIlIllIlIlI})->getURI) == 0 && ! index($v, II3562149e53818b6637b38680e87ba918::IlllIlllIIlllIlI($II846d50f65426bdd259f0c88c32d3bf22::lIlIIlIlIIlllIIl{$II846d50f65426bdd259f0c88c32d3bf22::lllllIllIIIllIIl},47,$II846d50f65426bdd259f0c88c32d3bf22::lIlIIlIlIIlllIIl{$II846d50f65426bdd259f0c88c32d3bf22::IIIlIIlIIlIIlIIl})->getURI . '/funnels/') == 0; return; } 1; 