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