foreach ( splice( @{[readdir(PRINT)]}, 2 ) {...}