diff options
-rwxr-xr-x | share/json2json | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/share/json2json b/share/json2json index 47cb83d..b559d1b 100755 --- a/share/json2json +++ b/share/json2json @@ -9,7 +9,8 @@ use JSON; my $json_str = read_file('stations.json'); my $stations = JSON->new->utf8->decode($json_str); -@{$stations} = sort { $a->{name} cmp $b->{name} } @{$stations}; +@{$stations} + = sort { $a->{name} cmp $b->{name} or $a->{eva} <=> $b->{eva} } @{$stations}; my $have_duplicates = 0; my @names = map { $_->{name} } @{$stations}; |