Filename_new.Win32.drive_and

let drive_and_path s =

    if has_drive s

    then (String.sub s 0 2, String.sub s 2 (String.length s - 2))

    else ("", s)