print map$_.$/,<*.$ext>;