I just discovered an odd bug, and felt that I had to let people know.
It used to be that the following worked:
use File::Slurp qw/slurp/;
use JSON;
my $data = decode_json( slurp('file.json') );
Since some recent update to the JSON module, you have to use:
my $data = decode_json( scalar( slurp('file.json') ) );
Ricky
The information in this e-mail is intended only for the person to whom it is
addressed. If you believe this e-mail was sent to you in error and the e-mail
contains patient information, please contact the Partners Compliance HelpLine at
http://www.partners.org/complianceline . If the e-mail was sent to you in error
but does not contain patient information, please contact the sender and properly
dispose of the e-mail.
_______________________________________________
Boston-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/boston-pm
