{gsub(/[^%s*]|%%/,z);while(sub(/%\*/,"%s%"));$0=gsub(/%s/,z)}1