Interlinear

Score: 347.20 (pass)

#!perl
map{s/
/ /;$x.=$_}<>;for$d($x=~/.*?\./g){$q=$z=$c=$_=$p="";for$w($d=~/\S+/g){$q++;$l=$v=0;for$e($w=~/\w/g){$l++;$z++;map{$v++if/$e/i}"aeiouy"}$c+=$v;$_.=($t=length($f="$v/$l"))>($y=length$w)?$w.$"x($t-$y+1):"$w ";$p.=$t>$y?"$f ":$f.$"x($y-$t+1)}s/ *$//;if(length>60){s/(.{57}).*/$1.../;$p=~s/(.{56}\s).*/$1/}$p=~s/ *$//;print"$q:\t$_
$c/$z:\t$p
"}

Score: 392.24 (pass)

#!perl
map{s/
/ /g;$x.=$_}<>;map{$q=$z=$c=$o=$p='';for$w(/\S+/g){$q++;$l=$v=0;for$e($w=~/\w/g){$l++;map{$v++if$_=~/$e/i}"aeiouy"=~/./g}$z+=$l;$c+=$v;$o.=($t=length"$v/$l")>($y=length$w)?$w.$"x($t-$y+1):"$w ";$p.=$t>$y?"$v/$l ":"$v/$l".$"x($y-$t+1)}$o=~s/ *$//;if(length$o>60){$o=~s/(.{57}).*/$1.../;$g=$o=~/\s.{4}$/?'\s+)':')';$p=~s/(.{56}$g.*/$1/}$p=~s/ *$//;print"$q:\t$o
$c/$z:\t$p
"}$x=~/.*?\./g

Score: 462.24 (pass)

number one baby!

#!perl
map{s/\n/ /g;$x.=$_}<>;for($x=~/(.*?\.)/g){$q=$z=$c=0;$o=$p='';for$w(/\S+/g){$q++;$l=$v=0;for$e($w=~/\w/g){$l++;map{$v++if$_=~/$e/i}"aeiouy"=~/./g}$z+=$l;$c+=$v;$t=length"$v/$l";$y=length$w;if($t>$y){$o.=$w.$"x($t-$y+1);$p.="$v/$l "}else{$o.="$w ";$p.="$v/$l".$"x($y-$t+1)}}$o=~s/\s*$//;$p=~s/\s*$//;if(length$o>60){$o=~s/(.{57}).*/$1.../;if($o=~/.*\s\S\.\.\.$/){$p=~s/(.{57}\S+).*/$1/}else{$p=~s/(.{56}).*/$1/}}$p=~s/\s*$//;print"$q:\t$o\n";print"$c/$z:\t$p\n"}