let run () = match !_runmode with | CMD_LINE (l) -> toggle _sl; eval_list l | STDIN -> disp_welcome (); eval_stdin () | REPLACE -> eval_stdin_replace ()