Created by www.tryperl.com.

JSON.pl

#Created by tryperl.com
use strict;
use warnings;

print "Go Ahead and edit me!";
print "Once you are done editing, click SAVE to save changes :D";
# print <>; #you can use the STDIN to put data into your program 

use JSON;

my $foo = "true";

my $x = from_json ($foo);

use Data::Dump "pp";

print "Foo:".pp ($x). "\n";