Subject: | Escape of '$' using \$ does not work for Config::General::Interpolated |
use Config::General;
use Test::More tests => 1;
my $conf = new Config::General(
-String => q{FOO = "\$foo"},
-InterPolateVars => 1
);
my %all = $conf->getall;
ok($all{FOO} eq '$foo');
1..1
not ok 1
# Failed test in ttt at line 10.
# Looks like you failed 1 test of 1.