print reverse map { s/oldpage/newpage/g; $_ } ; __DATA__ title oldpage oldpage htm tab aaaaa