Show PATH elements in separate lines

show_path_lines.ml

(* My second Ocaml program ever  *)
(*                               *)
(* @author Christos KK Loverdos  *)

open Str

(* Version 1 *)
(* ========= *)
(* let () = *)
(*   let colon_re = Str.regexp ":" *)
(*   and path = Sys.getenv "PATH" in *)
(*   let paths = Str.split colon_re path in *)
(*   let print s = *)
(*     print_string s; *)
(*     print_newline (); *)
(*   in *)
(*   List.iter print paths *)

(* Version 2 *)
(* ========= *)
(* List.iter (print_endline) (Str.split (Str.regexp ":") (Sys.getenv "PATH")) *)

(* Version 3 *)
(* ========= *)

let (|>) x f = f x

let () =
  Sys.getenv "PATH" |> Str.split (Str.regexp ":") |> List.iter print_endline