From 2e3cd1d6b0b40f26a9f624e3a2e0af991d8cb6db Mon Sep 17 00:00:00 2001
From: Fabian Kurz <fabian@fkurz.net>
Date: Sat, 9 Oct 2021 20:35:29 +0200
Subject: [PATCH] lotw import: only import "state" values with max 2 letters

the database field only is varchar(2) which is fine for
US states, but LoTW may include stuff like <STATE:3>NSW for
VK stations.
---
 yfksubs.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/yfksubs.pl b/yfksubs.pl
index cba258e..25999bd 100644
--- a/yfksubs.pl
+++ b/yfksubs.pl
@@ -5467,7 +5467,7 @@ sub lotwimport {
                 $grid = substr($grid, 0, 6);
             }
         }
-        elsif ($line =~ /STATE:\d+>(\w+)/) {
+        elsif ($line =~ /STATE:2>([A-Z]{2})/) {
             $state= $1;
         }
         elsif ($line =~ /<eor>/) {