open(FILE,'>' . $stdin_file);
              binmode(FILE);
              print FILE $script_input;
              close(FILE);
              close(STDIN);
              open(STDIN, '<',$stdin_file);