get~~/\s.+/;$!=+<=*,map {sum @$! X>=$_},^401