| /trunk/ModMETAR.pm |
|---|
| 825,10 → 825,9 |
| while ( $tok =~ /($_weather_types_pat)/gi ) |
| { |
| $engl .= " " . $_weather_types{$1}; ## figure out weather |
| $rusl .= " " . $_weather_types_ru{$1} . ", "; |
| $rusl .= " " . $_weather_types_ru{$1}; |
| $rawl .= " " . $1; |
| } |
| $rusl = substr($rusl, 0, length($rusl)-2); |
| ## addl qualifier |