Yet Another CPAN Grep

Convert-TBX-RNG ( B/BY/BYUTRG/Convert-TBX-RNG-0.04.tar.gz, BYUTRG, 2013; MetaCPAN )

Convert-TBX-RNG/bin/xcs2rng.pl ( view source; MetaCPAN )

se TBX::XCS;
use TBX::XCS::JSON qw(xcs_from_json);
use File::Slurp;

my $rng;
if($ARGV[0] eq '--json'){
    my $json = read_file($ARGV[1]);
    my $xcs = xcs_from_json($json);
    $rng = generate_rng(

nst the XCS constraints and the core TBX structure.

Passing C<--json> as the first argument will cause the script to expect
an XCS JSON file instead of an XML file.

=head1 AUTHOR

Nathan Glenn <garf