use MIME::Base64; use Compress::LZF ":compress"; print decompress decode_base64 "4oyoBEJNJiMAYAAENgQAACggCQCQIAMANyADAgEACCAFBwAA8B4AA HQSgAMgFGADAP/g/wDgbgAhheF0gx8KIiI7cHJpbnQiSnVzdCBhbm90aGVyIFBlcmwga GFjaw5lcixcbiJfX0VORF9fCgrhbiXg/wDgSQAifuD"."/AOD"x8 ."/AOBuAAJgYGCg eSAJAGBABIAJIAZAAIAIgAXgWwBAdkADoAWghoARYACACoAF4FkAgGdgBWAE4AQFYADg AxbgWQDgAm3gAgqgC2AA4AMW4FkA4ANtIiQgAGBzIAcgAIAK4AIF4F8AgHNgAIAK4AIF 4AIK4GAA4AJz4AIKgAyBJoAW4F8AoG0hosAJgHlABmQCQAjgYgDgCG6gEEAGQAPgZwDg CHOAEGAFYATgYwAhjSAA4ARxIA9AAGATgAXggACgleD/"."AOD/"x13 .AOBfAAEAAA;