oecho/oecho0.ml


1
2
3
4
5
6
7
8
9

open Arg
open Unix
open Scanf
open Printf

let num = Array.length Sys.argv
let _ = if num >= 2 then
    Printf.printf "%s\n" Sys.argv.(1)
    else Printf.printf "\n"