X-Git-Url: http://git.vrable.net/?a=blobdiff_plain;f=contrib%2Frestore.pl;h=98ae277d17e2203879149f9b19c3f436f8eb4a74;hb=9d3cca72ea3c0f912c7250d84e12357346e59fe2;hp=556297445e11187b44b8c19d80dd922eafc31d5d;hpb=618f744b4f63484cecd41e9dfba21f51d65bef1f;p=cumulus.git diff --git a/contrib/restore.pl b/contrib/restore.pl index 5562974..98ae277 100755 --- a/contrib/restore.pl +++ b/contrib/restore.pl @@ -359,7 +359,7 @@ sub process_metadata { # Try to parse the data as "key: value" pairs of file metadata. Also # handle continuation lines, which start with whitespace and continue # the previous "key: value" pair. - if ($line =~ m/^(\w+):\s*(.*)$/) { + if ($line =~ m/^([-\w]+):\s*(.*)$/) { $info{$1} = $2; $last_key = $1; } elsif ($line =~/^\s/ && defined $last_key) { @@ -409,7 +409,7 @@ while (defined($line = )) { # lines. chomp $line; - if ($line =~ m/^(\w+):\s*(.*)$/) { + if ($line =~ m/^([-\w]+):\s*(.*)$/) { $descriptor{$1} = $2; $last_key = $1; } elsif ($line =~/^\s/ && defined $last_key) {