#!/usr/bin/perl

          {;$ _
=q(Ju       st a 
nothe        r Pe 
rl ha         cker
              ,); s
              [  \s
              {2,}]
              {}xsg
;};$#         =$_ ;
{;s(:        )(: :
];);}       print
           $=;;