Lines Matching refs:pc
15 my $pc = new JSON::PP;
18 $js = $pc->encode($obj);
22 $pc->pretty (1);
23 $js = $pc->encode($obj);
34 $pc->pretty(0);
35 $js = $pc->encode($obj);
40 $pc->pretty(1);
41 $js = $pc->encode($obj);
55 $pc->pretty(0);
56 $js = $pc->encode($obj);
61 $pc->indent(3); # original -- $pc->indent(1);
62 is($pc->encode($obj), qq|{\n "foo":"bar"\n}\n|, "nospace");
63 $pc->space_after(1);
64 is($pc->encode($obj), qq|{\n "foo": "bar"\n}\n|, "after");
65 $pc->space_before(1);
66 is($pc->encode($obj), qq|{\n "foo" : "bar"\n}\n|, "both");
67 $pc->space_after(0);
68 is($pc->encode($obj), qq|{\n "foo" :"bar"\n}\n|, "before");