Browse Source

if the QTH field contains a Maidenhead locator, save it in the GRID database field

develop
Fabian Kurz 2 years ago
parent
commit
8632bd56a0
  1. 6
      yfksubs.pl

6
yfksubs.pl

@ -1059,6 +1059,12 @@ sub saveqso {
$qso[12] = $1." ".$3;
}
# searching for a GRID in the QTH field
if ($qso[6] =~ /^([A-Z]{2}[0-9]{2}[A-Z]{2}|[A-Z]{2}[0-9]{2})$/i){
$grid = uc($1);
$qso[6] = uc($1);
}
# trim remark
$qso[12] =~ s/\s*$//;

Loading…
Cancel
Save