Longest common prefix: Difference between revisions
add sed
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
(add sed) |
||
Line 3,372:
(list.min.view,list.max.view).zipped.takeWhile(v => v._1 == v._2).unzip._1.mkString)
}</syntaxhighlight>
=={{header|sed}}==
<syntaxhighlight lang="sed">1!{
G
s/^\([^\n]*\)[^\n]*\n\1.*/\1/
}
h
$!d</syntaxhighlight>
{{out}}
<pre>
$ printf '%s\n' interspecies interstellar interstate | sed -f lcp.sed
inters
$ printf '%s\n' throne throne | sed -f lcp.sed
throne
$ printf '%s\n' throne dungeon | sed -f lcp.sed
$ printf '%s\n' throne '' throne | sed -f lcp.sed
$ printf '%s\n' cheese | sed -f lcp.sed
cheese
$ printf '%s\n' '' | sed -f lcp.sed
$ printf '%s\n' prefix suffix | sed -f lcp.sed
$ printf '%s\n' foo foobar | sed -f lcp.sed
foo
</pre>
=={{header|Sidef}}==
| |||