#!/usr/bin/perl


          {;$ _
=q(Ju     st a 
nothe   r sad P 
erl h   acker
       ,); s
       [  \s
       {2,}]
       {}xsg
;};$#   =$_ ;
{;s(:    )(: :
];);}     print
            $=;;