- $doiota = '\b(IOTA|(AF|AN|NA|SA|EU|AS|OC)[- ]?\d?\d\d)\b' unless $doiota;
- push @flist, "info {$doiota}";
- dbg("sh/dx iota") if isdbg('sh/dx');
+ $doiota = '\b(IOTA|(AF|AN|NA|SA|EU|AS|OC)[-\s]?\d?\d\d)\b' unless $doiota;
+ push @flist, 'info', "{$doiota}";
+ dbg("sh/dx iota info {$doiota}") if isdbg('sh/dx');