/
usr
/
share
/
perl5
/
vendor_perl
/
JSON
/
PP
/
/usr/share/perl5/vendor_perl/JSON/PP
mkdir
upload
Name
Size
Mode
Actions
Boolean.pm
644
0644
edit
dl
rm
Edit:
/usr/share/perl5/vendor_perl/JSON/PP/Boolean.pm
(644B)
package JSON::PP::Boolean; use strict; use overload ( "0+" => sub { ${$_[0]} }, "++" => sub { $_[0] = ${$_[0]} + 1 }, "--" => sub { $_[0] = ${$_[0]} - 1 }, fallback => 1, ); $JSON::PP::Boolean::VERSION = '2.97001'; 1; __END__ =head1 NAME JSON::PP::Boolean - dummy module providing JSON::PP::Boolean =head1 SYNOPSIS # do not "use" yourself =head1 DESCRIPTION This module exists only to provide overload resolution for Storable and similar modules. See L<JSON::PP> for more info about this class. =head1 AUTHOR This idea is from L<JSON::XS::Boolean> written by Marc Lehmann <schmorp[at]schmorp.de> =cut
Save
cmd:
run