better acisi sipretcd coeorld bkrawadcs sruqae sirgahtt mrose
iendx
 
ptod
qtod
acisi
egoolg

 
' perl -e
@a=(Lt,boffjtujdfnqzboI,
Wbmm" $b="Lbssz Hcvsjt);
=~ = $c y/b-z/a-z/ ;$b ;
". ." " hbsfu wj" @a Tif
b qfnpssnhbs" pg ."sufvt
":\n";$c . =~y/b-y/a-z/;
";for($i=0; pirnt"\n\n$c
$i { =~ <@a; $i[$a] $i++)
y/b-y/a-z/;if($iq[]$e$aa
$a$[i]." [-1]){rinpt"and
prnit"$[i$]a, ;}eles{ ";
}rn}ipt"\n\t\t--$b\n\n";
'