RosettaCodeData/Task/Rot-13/OCaml/rot-13-3.ml
2024-10-16 18:07:41 -07:00

5 lines
142 B
OCaml

let () =
try while true do
String.iter (fun c -> print_char (rot13 c)) (read_line());
print_newline()
done with End_of_file -> ()