#!/usr/bin/perl *=*j=>*-=*k=>*>=*l=>*<=*m; while(<>){chomp;$*++;$-+=$_;($_>$>)&&($>=$_);($_<($<||=$>))&&($<=$_)}$-/=$*; print"$> $- $<\n"