From 7aa2d601c6e1d313f8daa2921e8b8adfaa0dc570 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 14 Dec 2020 18:36:56 +0100 Subject: catch more routes --- bin/db-wagenreihung-to-json | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bin/db-wagenreihung-to-json b/bin/db-wagenreihung-to-json index c0bf401..ceb1a7e 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{5} \S }x ) { + elsif ( $state eq "train_no" and $line =~ m{ ^ \s{3,5} \S }x ) { $state = "route"; $map{$number}{route} = ""; } @@ -318,7 +318,7 @@ for my $line (@lines) { } } - if ( $state eq "route" and $line =~ m{ ^ \s{5} (? .* ) $ }x ) { + if ( $state eq "route" and $line =~ m{ ^ \s{3,5} (? .* ) $ }x ) { if ( length( $map{$number}{route} ) ) { $map{$number}{route} .= ' '; } -- cgit v1.2.3