RosettaCodeData/Task/Find-common-directory-path/Ed/find-common-directory-path.ed
2024-10-16 18:07:41 -07:00

9 lines
94 B
Text

# by Artyom Bologov
H
,p
g/.*/s//&|/
,j
s/^([^|]*\/)[^|]*\|(\1[^|]*\|)*$/&: \1/
s/\|/ /g
,p
Q