Raps2.pm: file_to_hash: Allow whitespace in values

1 files changed, 1 insertions, 1 deletions

diff --git a/lib/App/Raps2.pm b/lib/App/Raps2.pm
index 348352c..c5d4226 100644
--- a/lib/App/Raps2.pm
+++ b/lib/App/Raps2.pm
@@ -47,7 +47,7 @@ sub file_to_hash {
 	my $ret;
 
 	for my $line ( slurp($file) ) {
-		my ( $key, $value ) = split( qr{ \s+ }x, $line );
+		my ( $key, $value ) = ( $line =~ m{ ^ ([^ ]+) \s+ (.+) $ }x );
 
 		if ( not( $key and $value ) ) {
 			next;