$\="   #"x<>;print$\|=$_=" $\
",/( (((#.*))))/s,$1