| Subject: | Fails to parse a simple dictionary ASCII plist |
This may / may not be related to a much newer Perl version... (5.22)
(Things get more complicated with ASCII plists containing nested structures)
Test script:
---------------
use Data::PropertyList qw(fromtext);
use Data::Dumper;
use strict;
my $str =
'{
Key = "";
Key2 = Value;
}';
print "$str\n";
my $plist = fromtext($str);
print Dumper($plist)."\n";
---------------
Output:
----------
{
Key = "";
Key2 = Value;
}
PropertyList error, = not found at line 1
PropertyList error, value not found in '' - ; at line 1
PropertyList error, = not found at line 4
PropertyList error, value not found in '' - ; at line 4
$VAR1 = {
'Key2' => 'Value',
'Key' => '',
'}' => 1,
'{' => 1
};
----------
Expected output:
----------
{
Key = "";
Key2 = Value;
}
$VAR1 = {
'Key2' => 'Value',
'Key' => ''
};
----------