#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$z.=$".$"x($0=$x=~y///c-length$z),$x.=$".$"x-$0if$x;$v+=$V=lc=~y/aeiouy//;$x.=$_;$l+=$L=s/\w//g;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$0=$x=~y///c-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=lc=~y/aeiouy//;$x.=$_;$l+=$L=s/\w//g;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$0=length($x)-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=lc=~y/aeiouy//;$x.=$_;$l+=$L=s/\w//g;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$0=length($x)-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=lc=~y/aeiouy//;$l+=$L=s/\w/$&/g;$x.=$_;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$0=length($x)-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=y/aeiouyAEIOUY//;$l+=$L=s/\w/$&/g;$x.=$_;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(?<=.{57}).{4,}/.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{$0=length($x)-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=y/aeiouyAEIOUY//;$l+=$L=s/\w/$&/g;$x.=$_;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(.{57}).{4,}/$1.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:   $x
$v/$l:  $z
"if$w=map{$0=length($x)-length$z,$z.=$".$"x$0,$x.=$".$"x-$0if$x;$v+=$V=y/aeiouyAEIOUY//;$l+=$L=s/\w/$&/g;$x.=$_;$z.="$V/$L"}split

#!perl -n056
$x=$z=$v=$l="";$x=~s/(?<=.{57}).{4,}/.../&&$z=~s/ *(?<=.{56}) +.+//,print"$w:	$x
$v/$l:	$z
"if$w=map{(($0=length($x.=$")-length($z.=$"))>0?$z:$x).=$"x abs$0if$x;$v+=$V=y/aeiouyAEIOUY//;$l+=$L=s/\w/$&/g;$x.=$_;$z.="$V/$L"}split