23 print
"changeENV starting....\n";
24 $opts = getopt(
'hc:');
26 $Usage =
"{$argv[0]}: [-h] -c <change-string>\n";
33 if (array_key_exists(
"h",$opts)) {
40 if (array_key_exists(
"c",$opts)) {
41 $change2 = $opts[
'c'];
42 if(!strlen($change2)) {
52 $testEnv =
'../../../tests/TestEnvironment.php';
54 $sedLine =
"sed -e \"1,$ s/USER=.*/USER='$change2';/\" ".
55 "-e \"1,$ s/WORD=.*/WORD='$change2';/\" $testEnv
57 $changed = exec($sedLine, $out, $rtn);
60 $FH = fopen($testEnv,
'w') or die("Can't open $testEnv\n $phpErrorMsg");
61 foreach ($out as $line) {
62 if(FALSE === fwrite($FH,
"$line\n")) {
63 print
"FATAL! cannot wite to $testEnv\n";