#!/usr/bin/perl -w use strict;@\ = (9,15,{7=>79,22=>124## ,23=>124,26=>78,27=>45,28=>67,29=>72## ,49=>45,70=>124,47=>51,58=>124,54=>### 124,65=>124,79=>47,42=>92,30=>51,36### =>47,40=>47,38=>92,46=>72,48=>67,50### =>78,70=>124,92=>79,81=>92,83=>47,85## =>92,78=>47,73=>124,69=>124,55=>124,## 129=>51,128=>72,127=>67,112=>124,101## =>78,97=>78,87=>47,88=>47},1,0);map{## map{$\[4]++;$\[2]{$\[4]}?print chr$\## [2]{$\[4]}:print ' ';}(1..(($\[0]*$\## [1])/9));print "\n";}(1..9);##########