diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2012-01-05 13:28:19 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2012-01-05 13:28:19 +0100 |
| commit | fff1e3de7b66709b6ad4ca36ac0c0cb2e04099d3 (patch) | |
| tree | d3760b2d6e8bc5486db4efef16d9f2452a51bd5d /lib/App | |
| parent | a9358cc0e672b4ea3b63352d5cff2bc1bd42b80d (diff) | |
Raps2.pm: file_to_hash: Allow whitespace in values
Diffstat (limited to 'lib/App')
| -rw-r--r-- | lib/App/Raps2.pm | 2 |
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; |