foreach(grep ! /^\.{1,2}$/, readdir(PRINT)){
    #do work
}