print!<>+grep$p=!$p|$p==$_&&$_,glob<>