I think your code produces a picture that's a little bit different from the original question.

Here's one at 83:

@s=("*"," *"x5,"="x15,"\n");@p=((@s," *"x5,"\n")x3,@s,("\n",'='x26,"\n
+")x3);print@p
[download]