| #!/usr/bin/env perl | |
| # Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al. | |
| # | |
| # SPDX-License-Identifier: curl | |
| use strict; | |
| use warnings; | |
| use File::Basename; | |
| chdir dirname(__FILE__) . '/..'; | |
| exit system('scripts/badwords', ('scripts/badwords.txt', | |
| '**.md', 'projects/OS400/README.OS400', 'include', 'docs/examples')) >> 8; |