From 3e0d254e0d6197987f2d8efce144cb29da3c6f7a Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Thu, 28 Mar 2024 15:47:53 +0100 Subject: fix variable name --- kontakt.cgi | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'kontakt.cgi') diff --git a/kontakt.cgi b/kontakt.cgi index cfe9a08..99951e3 100755 --- a/kontakt.cgi +++ b/kontakt.cgi @@ -22,7 +22,7 @@ my ($confirm) = 1; # Built-in email validation is too simplistic my $valid_email = '/^[+_A-Za-z0-9-]+(\.[+_A-Za-z0-9-]+)*@[A-Za-z0-9-]+(\.[A-Za-z0-9-]+)*(\.[_A-Za-z0-9-]+)$/'; -my $valid_dk_zip = '/^([Dd][Kk])?.?[0-9-]{4}$/'; +my $valid_zip_dk = '/^([Dd][Kk])?.?[0-9-]{4}$/'; my $form = CGI::FormBuilder->new( lang => 'da', -- cgit v1.2.3