diff options
| author | HVukman <peterslopp@googlemail.com> | 2025-07-12 09:58:02 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-07-12 09:58:02 +0200 |
| commit | 14867ad844bf5241f826fa4b6c8519712daab066 (patch) | |
| tree | 3bc1c3a5ab4dc68970a43d19a10750c7339632c6 | |
| parent | 3cf3e50bad78b8424aaf141ee55c7418ea5dc54e (diff) | |
| download | perlweeklychallenge-club-14867ad844bf5241f826fa4b6c8519712daab066.tar.gz perlweeklychallenge-club-14867ad844bf5241f826fa4b6c8519712daab066.tar.bz2 perlweeklychallenge-club-14867ad844bf5241f826fa4b6c8519712daab066.zip | |
Create 329_p1.fs
| -rw-r--r-- | challenge-329/hvukman/f#/329_p1.fs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/challenge-329/hvukman/f#/329_p1.fs b/challenge-329/hvukman/f#/329_p1.fs new file mode 100644 index 0000000000..e41216743b --- /dev/null +++ b/challenge-329/hvukman/f#/329_p1.fs @@ -0,0 +1,9 @@ +// Part 1 + +//with regex match and filter distinct + +let splitRuns s = Regex("\d+").Matches(s) |> Seq.cast<Match> |> Seq.map (fun m -> m.Value) |> Seq.toList |> Seq.distinct +printfn "%A" (splitRuns "go21od1lu5c7k") +printfn "%A" (splitRuns "the1weekly2challenge2") +printfn "%A" (splitRuns "4p3e2r1l") +printf "\n" |