Average Character by clock

<?for(;$n=ord(fgetc(STDIN));)$n>10?$i++*$s+=$n:$s=$i=0*print chr($s/$i).~\xf5;

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page