Merge pull request by prauscher and fix perl code

1 files changed, 6 insertions, 2 deletions

diff --git a/bin/db-iris b/bin/db-iris
index fabb0a0..b710f37 100755
--- a/bin/db-iris
+++ b/bin/db-iris
@@ -113,7 +113,9 @@ sub get_station {
 sub show_help {
 	my ($code) = @_;
 
-	print 'Usage: db-iris [-V] [-c <classlist>] [-d <date>] [-o <output-flags>] [-p <platforms>] [-t <time>] [-T <typelist>] [-v <via>] <station>' . "\n" .
+	print 'Usage: db-iris [-V] [-c <classlist>] [-d <date>] '
+	  . '[-o <output-flags>] [-p <platforms>] [-t <time>] '
+	  . '[-T <typelist>] [-v <via>] <station>' . "\n"
 	  . "See also: man db-iris\n";
 
 	exit $code;
@@ -247,7 +249,9 @@ db-iris - Interface to the DeutscheBahn online departure monitor
 
 =head1 SYNOPSIS
 
-B<db-iris> [B<-V>] [B<-c> I<classlist>] [B<-d> I<date>] [B<-o> I<output-flags>] [B<-p> I<platforms>] [B<-t> I<time>] [B<-T> I<typelist>] [B<-v> I<via>] I<station>
+B<db-iris> [B<-V>] [B<-c> I<classlist>] [B<-d> I<date>] [B<-o> I<output-flags>]
+[B<-p> I<platforms>] [B<-t> I<time>] [B<-T> I<typelist>] [B<-v> I<via>]
+I<station>
 
 =head1 VERSION