Yet Another CPAN Grep

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/json2perl.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::json2dump($INPUT_STRING, \%params);
if( ! defined $r

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/yaml2perl.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::yaml2dump($INPUT_STRING, \%params);
if( ! defined $r

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/yaml2json.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::yaml2json($INPUT_STRING, \%params);
if( ! defined $r

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/json2json.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::json2json($INPUT_STRING, \%params);
if( ! defined $r

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/perl2json.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::dump2json($INPUT_STRING, \%params);
if( ! defined $r

Data-Roundtrip ( B/BL/BLIAKO/Data-Roundtrip-0.29.tar.gz, BLIAKO, 2024; MetaCPAN )

Data-Roundtrip/script/json2yaml.pl ( view source; MetaCPAN )

ed.\n"; exit(1) }
} elsif( ! defined $INPUT_STRING ){
	# read from STDIN
	$INPUT_STRING = do { local $/; <STDIN> }
}

my $result = Data::Roundtrip::json2yaml($INPUT_STRING, \%params);
if( ! defined $r