$t+=$_ for<>;print$t/$.

##</code><code>##

@ARGV=o;$t+=$_ for<>;print$t/$.