#!/usr/bin/perl
# Script produced with Perlguardian v 3.9 ....
# ===================================================
# © Copyright WCWS Internet - www.wcws.net
# ® All rights reserved
# Any attempt to copy or reverse engineer this code will be prosecuted
# No redistribution of the code is allowed
# ===================================================

local($^W)=0;my$a3478706631="IyEvdXNyL2Jpbi9wZXJsDQoJIyBTY3JpcHQgcHJvZHVjZWQgd2l0aCBQZXJsZ3VhcmRpYW4gdiAz
LjkgLi4uLg0KIyA9PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09
PT09PT0NCiMgqSBDb3B5cmlnaHQgV0NXUyBJbnRlcm5ldCAtIHd3dy53Y3dzLm5ldA0KIyCuIEFs
bCByaWdodHMgcmVzZXJ2ZWQNCiMgQW55IGF0dGVtcHQgdG8gY29weSBvciByZXZlcnNlIGVuZ2lu
ZWVyIHRoaXMgY29kZSB3aWxsIGJlIHByb3NlY3V0ZWQNCiMgTm8gcmVkaXN0cmlidXRpb24gb2Yg
dGhlIGNvZGUgaXMgYWxsb3dlZA0KIyA9PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09
PT09PT09PT09PT09PT09PT0NCiANCgkNCgkgCSBteSAkcGFzc3dvcmQgPSAiMTIzIjsNCnByaW50
ICJHaWIgZGFzIGdlaGVpbWUgUGFzc3dvcnQgZWluOlxuIjsNCm15ICRjaGVja19wdyA9IDxTVERJ
Tj47DQpjaG9tcCgkY2hlY2tfcHcpOw0KaWYoJGNoZWNrX3B3IGVxICRwYXNzd29yZCkNCnsNCglw
cmludCAiUGFzc3dvcnQga29ycmVrdC5cbiI7DQp9DQplbHNlDQp7DQoJcHJpbnQgIlBhc3N3b3J0
IGZhbHNjaC5cbiI7DQp9DQoJCQ==";my$r="";$a3478706631=~tr|A-Za-z0-9+=/||cd;if(length($a3478706631)%4){exit;}$a3478706631=~s/=+$//;$a3478706631=~tr|A-Za-z0-9+/| -_|;while($a3478706631=~/(.{1,60})/gs){my$l=chr(32+length($1)*3/4);$r.=unpack("u",$l.$1);}$_=$r;eval;@b=map($a3478706631,chr($r[4]));$a=60;s/...$/1$&/;$_=$b[4]*32;$r=$b[int(4+length($r)*3/4)];$b=73;$e=256|(ord$b[4])<<9|ord$b[$a];eval $e;