geninfo: Change json module

nehaljwani · oberpar · commit d666bae4eb29 · 2020-08-12T15:19:57.000+02:00
Perl module JSON may not be present on all distributions. Switch to using JSON:PP instead which is a Perl core module since Perl 5.14.0. xref: https://perldoc.perl.org/5.14.0/index-modules-J.html Note: JSON:PP is included in packages named perl-JSON-PP or libjson-pp-perl on some distributions Signed-off-by: Nehal J Wani <nehaljw.kkd1@gmail.com> [oberpar@linux.ibm.com: fixed missing colon in use]
diff --git a/bin/geninfo b/bin/geninfo
@@ -60,7 +60,7 @@ use Getopt::Long;
 use Digest::MD5 qw(md5_base64);
 use Cwd qw/abs_path/;
 use IO::Uncompress::Gunzip qw(gunzip $GunzipError);
-use JSON qw(decode_json);
+use JSON::PP qw(decode_json);
 
 if( $^O eq "msys" )
 {

Original file line number	Diff line number	Diff line change
`@@ -60,7 +60,7 @@ use Getopt::Long;`
`60`	`60`	`use Digest::MD5 qw(md5_base64);`
`61`	`61`	`use Cwd qw/abs_path/;`
`62`	`62`	`use IO::Uncompress::Gunzip qw(gunzip $GunzipError);`
`63`		`-use JSON qw(decode_json);`
	`63`	`+use JSON::PP qw(decode_json);`
`64`	`64`
`65`	`65`	`if( $^O eq "msys" )`
`66`	`66`	`{`