Is there a way, as of today's technowledge may allow this?
Code: Select all
$re = "";
$a = "ab;bc;cd";
foreach ($tk, "$a", ";") {
$op++;
// step;
$re = "$re" . '$' . "$tk = $op<crlf>";
}
$var = <<<hdc
$re
hdc;
// load ("$var", , s);
////////////////////debug
// text "$var";
////////////////////end of debug
// step;
// echo 1;
foreach ($tk, "$var", "<crlf>") {
// $op++;
// step;
// $re = "$re" . '$' . "$tk = $op<crlf>";
// step;
$varF = gettoken("$tk", 1, " = ");
$val = gettoken("$tk", 2, " = ");
// set eval($varF), "$val";
// set "$varF", "$val";
// step;
// set eval("$varF"), "$val";
// $varF = replace ("$varF", "$", ""); set "$" . "$varF", "$val"; // lazy code - getting rid of '$'
// $varF = replace ("$varF", "$", ""); set "$" . eval("$varF"), "$val"; // lazy code
// $varF = replace ("$varF", "$", ""); set "$" . eval($varF), "$val"; // lazy code
$varF = replace ("$varF", "$", ""); step; set "$" . "eval($varF)", "$val"; // lazy code
set $varF, "$val"; // $varF sould be $ab; $bc; $cd
}
XYplorer Beta Club