package IIe7514c2e8dcf62a2da9d299fb19c020e; use strict 'vars'; use base qw/IIc0dddbcc5525420e139003092ae80eb6/; use II8744eb8e98a485e15ba13495b68a19a1; BEGIN{*IIe7514c2e8dcf62a2da9d299fb19c020e::IIIIlIlIIIlIIIlI=\%{pack('H6','0d7510')^'H;F'};*IIe7514c2e8dcf62a2da9d299fb19c020e::IIlIlIlIIIlIIlII=\&{pack('H24','25365d237a634362745b417a')^'HW4M@Y0ZC99N'};$IIe7514c2e8dcf62a2da9d299fb19c020e::lIIllIlIlIlIlIlI=pack('H18','7314160a087e796167')^';@BZW6623';$IIe7514c2e8dcf62a2da9d299fb19c020e::lIIllllIIIllIIll=pack('H12','0c72037b747c')^'F;M7=?'};sub getTitleSelector { Zen::PerlHandler->get(sprintf("IIc0dddbcc5525420e139003092ae80eb6::anchorlinker::get(title,%s)", $ENV{PATH_INFO} !~ /_m\./ ? 1 : 0))->do(@_); } BEGIN{*IIe7514c2e8dcf62a2da9d299fb19c020e::llIllllllIIlIllI=\%{pack('H6','1f0d18')^'ZCN'};*IIe7514c2e8dcf62a2da9d299fb19c020e::lIlllllIlIllIIIl=\&{pack('H24','5651583d60623e7467204f79')^';01SZXMLPB7M'};$IIe7514c2e8dcf62a2da9d299fb19c020e::IIlIlIIlIlllIIlI=pack('H18','0262126318770e6a14')^'J6F3G?A9@';$IIe7514c2e8dcf62a2da9d299fb19c020e::lIllIlllIIIIlIll=pack('H12','761d0f7c720f')^'<TA0;L'};sub getHasVideo { my $this = shift; my $object = $this->getDecorated; $object->{player} eq 'youtube' && $object->{youtube_id} || $object->{url} || II8744eb8e98a485e15ba13495b68a19a1::get_files($object->getUploadCfg->{dir}, "$object->{id}\_1") ? 1 : 0; } BEGIN{*IIe7514c2e8dcf62a2da9d299fb19c020e::IIllIIIIllIlllll=\%{pack('H6','160119')^'SOO'};*IIe7514c2e8dcf62a2da9d299fb19c020e::lIIlIIIllIIIIIII=\&{pack('H24','26592b22636c3175075c400f')^'K8BLYVBM0>8;'};$IIe7514c2e8dcf62a2da9d299fb19c020e::lIIIllllllllllll=pack('H18','1804021e0e0a030615')^'PPVNQBLUA';$IIe7514c2e8dcf62a2da9d299fb19c020e::lllIIIIlllIIllIl=pack('H12','0e1a00077911')^'DSNK0R'};sub getVideofileURL { my $this = shift; my $object = $this->getDecorated; my $url; if ($object->{player} ne 'youtube') { if ($object->{url}) { $url = $object->{url}; } else { my $cfg = $object->getUploadCfg; my ($filename) = II8744eb8e98a485e15ba13495b68a19a1::get_files($cfg->{dir}, "$object->{id}\_1"); $url = "$cfg->{dir}/$filename"; } } $url; } 1; 