$x+=$_/4for(sort{$a-$b}glob<>)[1..4];printf"%.2f",$x