From 5a70000edf314d0b8e68f5a58afc8be84605f14c Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 11 Nov 2011 13:37:49 +0100 Subject: filter all trains except S-Bahn (mostly for main stations) --- cgi/index.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'cgi') diff --git a/cgi/index.pl b/cgi/index.pl index 7fafc4f..c113466 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -146,7 +146,8 @@ sub render_image { my $dt; if ( ( @grep_line and not( $line ~~ \@grep_line ) ) - or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) ) + or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) + or ( $line =~ m{ ^ (RE | IC | EC) }x ) ) { next; } -- cgit v1.2.3