127 but uses no x or map

$l="* * * * * *===============\n";$e=$b=$s=$l;$s=~y/*= /  */;$b=~y/ */
+==/;$e=~y/*=/  /;$m=$l.$s;$f=$e.$b;print "$m$m$m$l$f$f$f";
[download]