XML::LibXML;
use HTML::Selector::XPath qw/selector_to_xpath/;
use Carp qw/ confess /;
use JSON qw/ decode_json /;
our $VERSION = "0.08";
our @EXPORT_OK = qw/ j fn /;
our @EXPORT = qw/ j /;
use cons
] =~ /^\d+$/;
# json array or object
return decode_json($_[0])
if $_[0] =~ /^(?:\{|\[)/;
# boolean
return JSON::true if $_[0] eq 'true';
return JSON::false if $_[0] eq