badwords.pl: enable warnings, fix them

This commit is contained in:
Viktor Szakats 2025-07-11 14:35:41 +02:00
parent 20d80015d0
commit f6ae4b7723
No known key found for this signature in database
GPG key ID: B5ABD165E2AEF201

View file

@ -13,7 +13,15 @@
#
# ---(accepted word)
#
my $w;
use strict;
use warnings;
my @whitelist;
my %alt;
my %exactcase;
my @w;
while(<STDIN>) {
chomp;
if($_ =~ /^#/) {