diff --git a/t/script.t b/t/script.t
index 3f9f8e9..fcdd1da 100644
--- a/t/script.t
+++ b/t/script.t
@@ -17,12 +17,19 @@
 my $script = catfile($f, '..', 'script', 'tei2korapxml');
 ok(-f $script, 'Script found');
 
-stderr_is(
+stdout_like(
   sub { system('perl', $script, '--help') },
-  "This program is called from inside another script.\n",
+  qr!This\s*program\s*is\s*usually\s*called\s*from\s*inside\s*another\s*script\.!,
   'Help'
 );
 
+stdout_like(
+  sub { system('perl', $script, '--version') },
+  qr!tei2korapxml - v\d+?\.\d+?!,
+  'Version'
+);
+
+
 # Load example file
 my $file = catfile($f, 'data', 'goe_sample.i5.xml');
 my $outzip = tmpnam();
@@ -105,6 +112,4 @@
 
 xml_is($struct_xml, '//*[name()="span" and @id="s3"]//*[@name="type"]', 'Autobiographie', 'text content');
 
-
-
 done_testing;