1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
#!/usr/bin/env zsh
export PERL5LIB=lib
IFS=','
checks="BSVG,Braunschweig,Hbf,Volkmarode,Moorhüttenweg
DING,Ulm,Hbf,Ulm,Theodor-Heuss-Platz
KVV,Karlsruhe,Hbf,Karlsruhe,Tivoli
LinzAG,Linz,Hbf,Linz,Hart
MVV,München,Hackerbrücke,München,Seeholzenweg
NVBW,Stuttgart,Brendle (Großmarkt),Stuttgart,Schwabstraße
SVV,Salzburg,Hbf,Salzburg,Mirabellplatz
TLEM,London,Waterloo Underground Station,London,St Pancras Way
VAG,Schallstadt,Bf,Freiburg im Breisgau,Hbf
VBL,Luzern,Bf,Luzern,Brüggligasse
Verbundlinie,Graz,Hbf,Graz,Mariatrost
VGN,Nürnberg,Hbf,Nürnberg,Messe
VMV,Schwerin,Hbf,Schwerin,Dreescher Markt
VOR,Wien,Hbf,Wien,Praterstern
VRN,Mannheim,Hbf,Ludwigshafen (Rhein),Hbf
VRR,Essen,Hbf,Essen,Rüttenscheider Stern
VRR2,Essen,Hbf,Essen,Rüttenscheider Stern
VVO,Dresden,Hbf,Dresden,Altmarkt
VVS,Stuttgart,Brendle (Großmarkt),Stuttgart,Schwabstraße"
echo $checks | while read service from_name from_place to_name to_place; do
echo -n "${service} ... "
if bin/efa -s $service $from_name $from_place $to_name $to_place > /dev/null; then
echo OK
fi
done
|