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