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