diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-01-06 06:41:31 +0100 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-01-06 06:41:31 +0100 |
commit | 9d741794bab21da8af1b958c26fabcd95c2ec631 (patch) | |
tree | 6c7e6fc34e6290b1e484f60bddbfee3cb664eff4 /bin | |
parent | d96a57754995aa269941deb0f56cc558d18fd45c (diff) |
dbris-m: only print identified station name if it differs from input
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/dbris-m | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/dbris-m b/bin/dbris-m index 156b8a7..3096293 100755 --- a/bin/dbris-m +++ b/bin/dbris-m @@ -94,8 +94,10 @@ elsif ( $opt{station} !~ m{ ^ \d+ $ }x ) { } my $found; for my $result ( $status->results ) { - say $result->name; if ( defined $result->eva ) { + if ( lc( $result->name ) ne lc( $opt{station} ) ) { + say $result->name; + } $opt{station} = $result; $found = 1; last; |