file.1 file.02 file.003 file.5 file.00007 file.011 #### perl -e '/\.0*(\d+)$/and$t[$1]=1for<*>;map{$t[$c]?1:print"$c ";$c++}@t'