1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- a/METAR.pm
+++ b/METAR.pm
@@ -1282,7 +1282,7 @@ sub _process
## Visibility.
##
- {
+ if($self->{visibility}) {
my $vis = $self->{visibility};
# test for statute miles
if ($vis =~ /SM$/){
@@ -1290,7 +1290,7 @@ sub _process
if ($vis =~ /M(\d\/\d)/o) {
$self->{VISIBILITY} = "Less than $1 statute miles";
} else {
- $self->{VISIBILITY} = $vis . " Statute Miles";
+ $self->{VISIBILITY} = $vis . " statute miles";
} # end if
# auto metars can have non-directional visibility reports
} elsif (($self->{MOD} eq 'AUTO') and ($vis =~ /(\d+)NDV$/)){
|
