Levenshtein distance/Alignment: Difference between revisions

Content added Content deleted
(Added Julia language)
m (→‎{{header|Perl 6}}: fix markup)
Line 428: Line 428:
=={{header|Perl 6}}==
=={{header|Perl 6}}==
{{trans|Perl}}
{{trans|Perl}}
<lang Perl 6>sub align ( Str $σ, Str $t ) {
<lang perl6>sub align ( Str $σ, Str $t ) {
my @s = flat *, $σ.comb;
my @s = flat *, $σ.comb;
my @t = flat *, $t.comb;
my @t = flat *, $t.comb;