accept YAML with trailing whitespace in header

YAML with a header that has trailing whitespace (i.e. '--- ' instead of
'---') is incorrectly treated as inline YAML. This fails since the
footer ('...') is not found on the same line. Whitespace after the
header is valid and needs to be treated correctly.

Author: Caldrin

Changes

@@ -1,4 +1,5 @@
 Revision history for Test-Harness
+        - Accept YAML with trailing whitespace in header (Maik Hentsche)
         - Stop bundling Test::More for testing
 
 3.35    2015-01-14

lib/TAP/Parser/YAMLish/Reader.pm

@@ -81,7 +81,7 @@ sub _read {
     my $line = $self->_peek;
 
     # Do we have a document header?
-    if ( $line =~ /^ --- (?: \s* (.+?) \s* )? $/x ) {
+    if ( $line =~ /^ --- (?: \s* (.+?)? \s* )? $/x ) {
         $self->_next;
 
         return $self->_read_scalar($1) if defined $1;    # Inline?