The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl 1.t'

use Test::More tests => 2;
BEGIN { use_ok('Config::Properties') };

my $cfg=Config::Properties->new();

eval {
    $cfg->load(\*DATA)
};

like ($@, qr/line\s6\b/, "error at line 6 is ok");



__DATA__
# hello
foo=one
    Bar : maybe one\none\tone\r
eq\=ua\:l jamon

this_is_an_error\=line

more : another \
    configuration \
    line
less= who said:\tless ??? 

cra\n\=\:\ \\z'y' jump