<>;print 30*grep$_.1<$,grep$+=$_,glob<>