diff options
Diffstat (limited to 'scripts/check-efa-urls')
| -rwxr-xr-x | scripts/check-efa-urls | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/scripts/check-efa-urls b/scripts/check-efa-urls new file mode 100755 index 0000000..3cb8a35 --- /dev/null +++ b/scripts/check-efa-urls @@ -0,0 +1,28 @@ +#!/usr/bin/env zsh + +export PERL5LIB=lib + +checks="BEG Dachau Dachau Bahnhof +BSVG Braunschweig Hbf +DING Ulm Hbf +KVV Karlsruhe Hbf +LinzAG Linz/Donau Hbf +MVV München Hackerbrücke +NVBW Stuttgart Hbf (A.-Klett-Pl.) +RVV Regensburg Hbf +VAG Schallstadt Bf +VGN Nürnberg Hbf +VMV Schwerin Hbf +VRN Mannheim Hbf +VRR Essen Hbf +VRR2 Essen Hbf +VRR3 Essen Hbf +VVO Dresden Hbf +VVS Stuttgart Schwabstraße" + +echo $checks | while read service name place; do + echo -n "${service} ... " + if perl -Ilib bin/efa-m -s $service $name $place > /dev/null; then + echo OK + fi +done |