#!perl -na
sub
g{y///c}sub
f{lc=~y#aeiouy##.'/'.y# -/:-@##c}map{$m=/\./?0:g>3?g:3;push@{--$|},$_.$"x($m-
g)for$_,f;if(/\./){$_="@1";$_=@0.":\t$_
".f.":\t@0
";@0=@1=();s/(\t.{57})....+(\n.+\t.{0,56}\S+).*/$1...$2/;print}}@F

#!perl -na
sub
f{lc=~y#aeiouy##.'/'.y# -/:-@##c}map{$m=/\./?0:y###c>3?y###c:3;push@{--$|},$_.$"x($m- y###c)for$_,f;if(/\./){$_="@1";$_=@0.":\t$_
".f.":\t@0
";@0=@1=();s/(\t.{57})....+(\n.+\t.{0,56}\S+).*/$1...$2/;print}}@F

#!perl -na
sub
f{lc=~y#aeiouy##.'/'.y# -/:-@##c}map{$m=/\./?0:y###c>3?y###c:3;push@{--$|},$_.$"x($m- y###c)for$_,f;if(/\./){$_="@1";$_=+@0.":\t$_
".f.":\t@0
";s/^(.+\t.{57})....+(\n.+\t.{0,56}\S+).*$/$1...$2/;@0=@1=();print}}@F

#!perl -na
sub f{lc=~y#aeiouy##.'/'.y# -/:-@##c}map{$m=($s=/\./)?0:y###c>3?y###c:3;push@{--$|},$_.$"x($m- y###c)for$_,f;if($s){$_="@1";$_=+@0.":\t$_
".f.":\t@0
";s/^(.+\t.{57})....+(\n.+\t.{0,56}\S+).*$/$1...$2/;@0=@1=();print}}@F

#!perl -na
map{$J+=$j=lc=~y#aeiouy##;$K+=$k=y#"-/:-@##c;$m=($s=/\./)?0:y###c>3?y###c:3;push@{--$|},$_.$"x($m- y###c)for$_,"$j/$k";if($s){$_=+@0.":\t@1
$J/$K:\t@0
";s/^(.+\t.{57})....+(\n.+\t.{0,56}\S+).*$/$1...$2/;$J=$K=@0=@1=();print}}@F

#!perl -na
map{$J+=$j=lc=~y#aeiouy##;$K+=$k=y#"-/:-@##c;$m=($s=/\./)?0:y###c>3?y###c:3;push@{--$|},$_.$"x($m- y###c)for$_,"$j/$k";if($s){$B="@0";($D="@1")=~s/(.{57})....+/$1.../&&$B=~s/(.{0,56}\S+).*/$1/;print+@0.":\t$D
$J/$K:\t$B
";$J=$K=@0=@1=()}}@F

#!perl -na
map{$J+=$v=lc=~y#aeiouy##;$K+=$l=y#"-/:-@##c;$m=($s=/\./)?0:y###c>3?y###c:3;push@{--$|},sprintf"%-*s",$m,$_ for$_,"$v/$l";if($s){$B="@0";($D="@1")=~s/(.{57})....+/$1.../&&$B=~s/(.{0,56}\S+).*/$1/;print+@0.":\t$D
$J/$K:\t$B
";$J=$K=@0=@1=()}}@F

#!perl -na
map{$J+=$v=lc=~y#aeiouy##;$K+=$l=y#"-/:-@##c;$b="$v/$l";$d=$_;$s=/\./?'':$";$$_.=sprintf"%-*s$s",$s?($n=length$d)>3?$n:3:0,${+lc}for D,B;if(++$Z,!$s){$D=~s/(.{57})....+/$1.../&&$B=~s/(.{0,56}\S+).*/$1/;print"$Z:\t$D
$J/$K:\t$B
";$$_=''for B..Z}}@F

#!perl -0n
sub t{--$|?D:B}map{$$_=''for B..Z;map{$Q+=$q=lc=~y/aeiouy//;$Z+=$z=y#"-/:-@##c;${L.t}=length$$_ for D,B;${+t}.=$"x(${L.t}-${L.t}).($C?$":":\t").$_ for$_,"$q/$z";$D=~s/(.{59})....+/$1.../&&$B=~s/(.{0,58}\S+).*/$1/;++$C}split;print"$C$D
$Q/$Z$B
"}/[^.]*./g

#!perl -nal
map{$d+=$v=lc=~y#aeiouy##;$q+=$l=y#"-/:-@##c;$s=/\./?'':$";$G=$_;$n=length($B="$v/$l");$z=y###c;$$_.=sprintf"%-*s$s",$s?$z>$n?$z:$n:0,${+uc}for g,b;if(++$c,!$s){$g=~s#(.{57})....+#$1...#&&$b=~s#(.{0,56}\S+).*#$1#;print"$c:\t$g
$d/$q:\t$b";$$_=''for b..z}}@F

#!perl -na
map{$d+=($v=lc=~y#aeiouy##);$q+=($l=y#"-/:-@##c);$s=/\./?'':$";$G=$_;$n=length($B="$v/$l");$z=y###c;$$_.=sprintf"%-*s$s",$s?$z>$n?$z:$n:0,${+uc}for g,b;if(++$c,!$s){$g=~s#(.{57}).{4,}#$1...#&&$b=~s#(.{0,56}\S+).*#$1#;print"$c:\t$g
$d/$q:\t$b
";$$_=''for b..z}}@F

#!perl -na
map{$d+=($v=y#aeiouyAEIOUY##);$q+=($l=y#"-/:-@##c);$s=/\./?'':$";$A=$_;$n=length($B="$v/$l");$z=y###c;$$_.=sprintf"%-*s$s",$s?$z>$n?$z:$n:0,${+uc}for a,b;if(++$c,!$s){$a=~s#(.{57}).{4,}#$1...#&&$b=~s#(.{0,56}\d+/\d+).*#$1#;print"$c:\t$a
$d/$q:\t$b
";$$_=''for a..z}}@F

#!perl -na
map{$d+=($v=y#aeiouyAEIOUY##);$e+=($l=y#"-/:-@##c);$z=y###c>($n=length($B="$v/$l"))?y###c:$n;$s=/\./?'':$";$A=$_;$$_.=sprintf"%-*s$s",$s?$z:0,${+uc}for a,b;if(++$c,!$s){$a=~s#(.{57}).{4,}#$1...#&&$b=~s#(.{0,56}\d+/\d+).*#$1#;print"$c:\t$a
$d/$e:\t$b
";$$_=''for a..e}}@F

#!perl -na
map{$d+=($v=y#aeiouyAEIOUY##);$e+=($l=y#a-zA-Z0-9##);$z=y###c>($n=length($B="$v/$l"))?y###c:$n;$s=/\./?'':$";$A=$_;$$_.=sprintf"%-*s$s",$s?$z:0,${+uc}for a,b;if(++$c,!$s){$a=~s#(.{57}).{4,}#$1...#&&$b=~s#(.{0,56}\d+/\d+).*#$1#;print"$c:\t$a
$d/$e:\t$b
";$$_=''for a..e}}@F

#!perl -na
map{$d+=($v=y#aeiouyAEIOUY##);$e+=($l=y#a-zA-Z0-9##);$z=y###c>($n=length($B="$v/$l"))?y###c:$n;$s=/\./?'':$";$A=$_;$$_.=sprintf"%-*s$s",$s?$z:0,${+uc}for a,b;if(++$c,!$s){$b=~s#(.{0,56}\d+/\d+).*#$1# if$a=~s#(.{57}).{4,}#$1...#;print"$c:\t$a
$d/$e:\t$b
";$$_=''for(a..e)}}@F

#!perl -na
map{$d+=($v=y#aeiouyAEIOUY##);$e+=($l=y#a-zA-Z0-9##);$z=y###c>($n=length($B="$v/$l"))?y###c:$n;$s=/\./?'':$";$A=$_;$$_.=sprintf"%-*s$s",$s?$z:0,${+uc}for a,b;if(++$c,!$s){$a=~s#(.{57}).*#$1...#,$b=~s#(.{0,56}\d+/\d+).*#$1# if length$a>60;print"$c:\t$a
$d/$e:\t$b
";$$_=''for(a..e)}}@F

#!perl -na
map{$j+=($v=y#aeiouyAEIOUY##);$k+=($l=y#a-zA-Z0-9##);$c=y###c>($n=length($B="$v/$l"))?y###c:$n;/\./?$c=$s='':$s=$";$A=$_;$$_.=sprintf"%-*s$s",$c,${+uc}for(a,b);if(++$i,!$s){$a=~s#(.{57}).*#$1...#,$b=~s#(.{0,56}\d+/\d+).*#$1# if length$a>60;print"$i:\t$a
$j/$k:\t$b
";$i=$j=$k=$a=$b=''}}@F

#!perl -na
for(@F){$j+=($v=y#aeiouyAEIOUY##);$k+=($l=y#a-zA-Z0-9##);$c=y###c>($n=length($B="$v/$l"))?y###c:$n;/\.$/?$c=$s='':$s=$";$a.=sprintf"%-*s$s",$c,$_;$b.=sprintf"%-*s$s",$c,$B;if(++$i,!$s){$a=~s#(.{57}).*#\1...#,$b=~s#(.{0,56}\d+/\d+).*#\1# if length$a>60;print"$i:\t$a
$j/$k:\t$b
";$i=$j=$k=$a=$b=''}}

#!perl -n
for(/(\S+)\s*/g){$j+=($v=y#aeiouyAEIOUY##);$k+=($l=y#a-zA-Z0-9##);$c=y###c>($n=length($B="$v/$l"))?y###c:$n;/\.$/?$c=$s='':$s=$";$a.=sprintf"%-*s$s",$c,$_;$b.=sprintf"%-*s$s",$c,$B;if(++$i,!$s){$a=~s#(.{57}).*#\1...#,$b=~s#(.{0,56}\d+/\d+).*#\1# if length$a>60;print"$i:\t$a
$j/$k:\t$b
";$i=$j=$k=$a=$b=''}}

#!perl -0
for(<>=~/[^\.]*\./g){my($a,$b,$i);for($_,/(\S+)\s*/g){$B=y/aeiouyAEIOUY//.'/'.y/a-zA-Z0-9//;if($i++){$c=y///c>($n=length$B)?y///c:$n;/\.$/?$c=$s='':$s=$";$a.=sprintf"%-*s$s",$c,$_;$b.=sprintf"%-*s$s",$c,$B}else{$A=$B}}$a=~s/(.{57}).*/\1.../,$b=~s/(.{0,56}\d+\/\d+).*/\1/ if length$a>60;print--$i.":	
$A:	$b
"}

#!perl -0
for(<>=~/[^\.]*\./g){my($a,$b,$i);for($_,/(\S+)\s*/g){$B=y/aeiouyAEIOUY//.'/'.y/a-zA-Z0-9//;if($i++){$c=y///c>($n=length$B)?y///c:$n;/\.$/?$c=$s='':$s=$";$a.=sprintf"%-*s$s",$c,$_;$b.=sprintf"%-*s$s",$c,$B}else{$A=$B}}$a=~s/(.{57}).*/\1.../,$b=~s/(.{0,56}\d+\/\d+).*/\1/ if length$a>60;print--$i.":\t$a
$A:\t$b
"}

#!perl
undef$/;for(<>=~/.*?\.\s/gs){my($a,$b,$i,$B);for($_,/(\S+)\s*/g){$B=y/aeiouyAEIOUY//.'/'.y/a-zA-Z0-9//;if($i++){$c=y///c>length$B?y///c:length$B;/\.$/?$c=$s='':$s=' ';$a.=sprintf"%-*s$s",$c,$_;$b.=sprintf"%-*s$s",$c,$B}else{$C=$B}}$a=~s/(.{57}).*/\1.../,$b=~s/(.{0,56}\d+\/\d+).*/\1/ if length$a>60;print--$i.":\t$a\n$C:\t$b
"}

#!perl
undef$/;for(<>=~/.*?\.\s/gs){my(@a,@b,$a,$b);for($_,/(\S+)\s*/g){chomp;push@a,$_;$_=lc;push@b,y/aeiouy//.'/'.y/a-z0-9//}for(1..$#a){$c=length$a[$_]>length$b[$_]?length$a[$_]:length$b[$_];$_==$#a?$c=$s='':$s=' ';$a.=sprintf"%-*s$s",$c,$a[$_];$b.=sprintf"%-*s$s",$c,$b[$_]}$a=~s/(.{57}).*/\1.../,$b=~s/(.{0,56}\d+\/\d+).*/\1/ if length$a>60;print"$#a:\t$a\n$b[0]:\t$b\n"}