diff options
Diffstat (limited to 'bin/db-wagenreihung-to-json')
-rwxr-xr-x | bin/db-wagenreihung-to-json | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/db-wagenreihung-to-json b/bin/db-wagenreihung-to-json index ceb1a7e..00f9518 100755 --- a/bin/db-wagenreihung-to-json +++ b/bin/db-wagenreihung-to-json @@ -275,7 +275,7 @@ for my $line (@lines) { $state = ""; } - elsif ( $state eq "train_no" and $line =~ m{ ^ \s{3,5} \S }x ) { + elsif ( $state eq "train_no" and $line =~ m{ ^ \s{2,6} \S }x ) { $state = "route"; $map{$number}{route} = ""; } @@ -318,7 +318,7 @@ for my $line (@lines) { } } - if ( $state eq "route" and $line =~ m{ ^ \s{3,5} (?<route> .* ) $ }x ) { + if ( $state eq "route" and $line =~ m{ ^ \s{2,6} (?<route> .* ) $ }x ) { if ( length( $map{$number}{route} ) ) { $map{$number}{route} .= ' '; } |