<?php
$data[0] = array('company', 'region', 'district', 'store', 'sales');
$data[1] = array('Foo, Inc.', 'Region A', 'District X', 'Store #1', 1500.0);
$data[2] = array('Foo, Inc.', 'Region A', 'District X', 'Store #2', 1300.0);
$data[3] = array('Foo, Inc.', 'Region A', 'District Y', 'Store #3', 2000.0);
$data[4] = array('Foo, Inc.', 'Region A', 'District Y', 'Store #4', 1800.0);
$data[5] = array('Foo, Inc.', 'Region B', 'District M', 'Store #11', 2500.0);
$data[6] = array('Foo, Inc.', 'Region B', 'District M', 'Store #12', 2300.0);
$data[7] = array('Foo, Inc.', 'Region B', 'District N', 'Store #13', 3000.0);
$data[8] = array('Foo, Inc.', 'Region B', 'District N', 'Store #14', 2800.0);
$rlib = rlib_init();
rlib_version();
rlib_add_datasource_array($rlib, "local_array");
rlib_add_query_as($rlib, "local_array", "data", "data");
$output_format = 'xml';
if (isset($argv[1])) {
$output_format = $argv[1];
}
rlib_add_report($rlib, "breaks.xml");
rlib_set_output_format_from_text($rlib, $output_format);
rlib_set_output_parameter($rlib, "debugging", "yes");
rlib_set_output_parameter($rlib, "only_quote_strings", "yes");
rlib_set_locale($rlib, "en_US");
rlib_execute($rlib);
// header(rlib_get_content_type($rlib));
rlib_spool($rlib);
rlib_free($rlib);
<?php
dl("rlib.so");
$data[0][0] = "first_name";
$data[0][1] = "last_name";
$data[0][2] = "color";
$data[0][3] = "group";
$data[0][4] = "breakfast";
$data[1][0] = "Bob";
$data[1][1] = "Doan";
$data[1][2] = "blue";
$data[1][3] = "1";
$data[1][4] = "Green Eggs And Spam I Am I Am";
$Alloc_Cnt = "-1";
$rlib = rlib_init();
rlib_set_locale($rlib, "pt_BR");
rlib_add_datasource_array($rlib, "local_array");
rlib_add_query_as($rlib, "local_array", "data", "data");
rlib_add_report($rlib, "expressions.xml");
rlib_add_function($rlib, "bobdoan", "bobdoan", 1);
rlib_add_function($rlib, "mikeroth", "mike_roth", 2);
rlib_set_output_format_from_text($rlib, "text");
rlib_execute($rlib);
header(rlib_get_content_type($rlib));
rlib_spool($rlib);
rlib_free($rlib);
function mike_roth($a, $b)
{
return "pancakes are yummier then {$a} and {$b}";
}
function bobdoan($a)
