package II8c6fc9df7d8a89eb67838440e28d5795; use strict 'vars'; use base qw/II720d6e18aa34327713eb014408fc9144/; use Zen; BEGIN{*II8c6fc9df7d8a89eb67838440e28d5795::lllllIllIlllIIll=\%{pack('H6','171c03')^'RRU'};*II8c6fc9df7d8a89eb67838440e28d5795::llllIlIlllIIIlll=\&{pack('H24','265d393f02624a720d34327c')^'K<PQ8X9J:VJH'};$II8c6fc9df7d8a89eb67838440e28d5795::lIllIIIIllIlIIIl=pack('H18','1e0c0561627105031f')^'VXQ1=9JPK';$II8c6fc9df7d8a89eb67838440e28d5795::llIIlIIlIIllllIl=pack('H12','7b0e16010d11')^'1GXMDR'};sub new { my ($class, $dir) = @_; die "dir?" unless $dir; die('call get() instead of new()') unless (caller(1))[3] =~ /::get$/; my $this = $class->SUPER::new; my $manifest = "$dir/MANIFEST.pl"; if (-e $manifest) { my $data = require $manifest; $this->set($data); } $this; } BEGIN{*II8c6fc9df7d8a89eb67838440e28d5795::IIIIIIIIllIlIlII=\%{pack('H6','02021d')^'GLK'};*II8c6fc9df7d8a89eb67838440e28d5795::IIlllIIllIIIlIll=\&{pack('H24','2d2b3a3b7a0a256d01574c6d')^'@JSU@0VU654Y'};$II8c6fc9df7d8a89eb67838440e28d5795::IIllllIlIIIIIIIl=pack('H18','0c000e1a0f0d0f6116')^'DTZJPE@2B';$II8c6fc9df7d8a89eb67838440e28d5795::IIllIlIlIlIlIlIl=pack('H12','00110d1f0376')^'JXCSJ5'};sub getForKit { my $class = shift; my $kit = shift; $class->get(Zen->getBaseDir . $kit); } 1; 