#!/usr/bin/perl
########################################################################
#
# $Id: mc_cleanup,v 1.7 2022/06/14 18:16:31 gosha Exp $
#
########################################################################
my @crypt_arr;{local($_,$^W);$_=tell DATA;seek DATA,$?,$^W=scalar @crypt_arr;read DATA,my $crypt_str,"$^F$=";seek DATA,$?,$_;@crypt_arr=map{ord($_)}split //,$crypt_str;}sub xg613_x{local$_;rd613l:{if($#_>$#crypt_arr){@crypt_arr=(@crypt_arr,@crypt_arr);redo rd613l;}}my $a3MOEQ9W4F="";for(my $pcRC9J5Vji=0;$pcRC9J5Vji<=$#_;$pcRC9J5Vji++){$a3MOEQ9W4F.=chr($_[$pcRC9J5Vji]/ ord($crypt_arr[$pcRC9J5Vji]));}$a3MOEQ9W4F;}package VirtualPBX;open STDERR,main::xg613_x(3162,3162,2444,5782,4753,5586,2444,6156,5439,5047,2444,4214,5145,5586,5684,5733,4947,5508,4080,3366,4488,2397,4488,4386,3366,2346,5865,5916,5100,5151,5814,5814);use strict;use lib qw(/opt/VirtualPBX/lib);use XVB::Core;use XVB::MC;MStsG8HqbX($ARGV[0]);sub new{my($ppuZUvE82P,$mqz59tr8NW)=@_;my $AnmzMI3HKg=bless{_CONF=>{}},$ppuZUvE82P;$AnmzMI3HKg->S3UQckeABZ($mqz59tr8NW);$AnmzMI3HKg->gMWzp30G8c();return $AnmzMI3HKg;}sub MStsG8HqbX{my $BUNiFfgVpd=shift;my $AnmzMI3HKg=VirtualPBX->new(main::xg613_x(2397,5661,5824,5684,2303,4214,5460,6498,5684,5733,5044,5292,3920,3234,4312,2303,5151,5916,5049,2397,6120,6018,4998,2346,5049,5202,5253));if($BUNiFfgVpd){$AnmzMI3HKg->ylh62CjTLO("CleanUp cache: $BUNiFfgVpd");$AnmzMI3HKg->FwdCZAK60p($BUNiFfgVpd,undef);}else{my $fgVNP8jtre=$AnmzMI3HKg->Y89WXfLe6Q(main::xg613_x(4080,3315,4368,3528,4655,4116,3588,4389,3920,3724,3380,4116,3381,4655,3332,3577,4182)).main::xg613_x(2397);my $PavlS9us6r=main::xg613_x(5202,5355,5720,4900,1568).$fgVNP8jtre." -name '*.tt'";my @krXgZNfuDO=`$PavlS9us6r`;$PavlS9us6r=main::xg613_x(5202,5355,5720,4900,1568).$fgVNP8jtre.main::xg613_x(1632,2295,6032,5929,5488,4949,1664,6156);foreach my $f1wxWBOVan9TgCXbUcZ0IKh(`$PavlS9us6r`){chomp $f1wxWBOVan9TgCXbUcZ0IKh;$PavlS9us6r="find ".$f1wxWBOVan9TgCXbUcZ0IKh."/ -name '*.tt'";push @krXgZNfuDO,`$PavlS9us6r`;}chomp @krXgZNfuDO;foreach my $GnqlTy8Yzr(@krXgZNfuDO){$AnmzMI3HKg->ylh62CjTLO("CleanUp cache: files-$GnqlTy8Yzr");$AnmzMI3HKg->FwdCZAK60p("files-$GnqlTy8Yzr",undef);}}};package main;
__DATA__
