use warnings;
use strict;

package   ::::::::::
{$_=q:!:;$::::::::::
=q;:;;sub ::::::::::
{s::@_:}}&::::::::::
($        ::::::::::
.        '::::::::::
',$       ::::::::::
x10);$    ::::::::::   
=q;::;;s. ::::::::::
    .$    ::::::::::
    \.$   ::::::::::
\.' '\.$  ::::::::::
      \.$ ::::::::::
       \.$::::::::::
.gex;s: \n::gx;print