diff options
Diffstat (limited to 'lib/Travel/Status/DE')
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Stations.pm.PL | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm.PL b/lib/Travel/Status/DE/IRIS/Stations.pm.PL index 021ab21..f0a9710 100644 --- a/lib/Travel/Status/DE/IRIS/Stations.pm.PL +++ b/lib/Travel/Status/DE/IRIS/Stations.pm.PL @@ -62,11 +62,8 @@ $buf .= <<'EOF'; my $meta = { EOF -for my $eva (keys %{$meta}) { - $buf .= sprintf("%s => [%s],\n", - $eva, - join(q{,}, @{$meta->{$eva}}) - ); +for my $eva ( keys %{$meta} ) { + $buf .= sprintf( "%s => [%s],\n", $eva, join( q{,}, @{ $meta->{$eva} } ) ); } $buf .= <<'EOF'; |