diff options
| author | chirvasitua <stuart-little@users.noreply.github.com> | 2020-12-14 12:40:04 -0500 |
|---|---|---|
| committer | chirvasitua <stuart-little@users.noreply.github.com> | 2020-12-14 12:40:04 -0500 |
| commit | 5b6a1d16f1e2f5e91883a67171129854ea125bb5 (patch) | |
| tree | 9411e517d7f94b67477dd7b643c7dad265d2c759 /challenge-021 | |
| parent | 3c0c4f283ed81e3cbeae88d75b0dbc80a8a081b8 (diff) | |
| download | perlweeklychallenge-club-5b6a1d16f1e2f5e91883a67171129854ea125bb5.tar.gz perlweeklychallenge-club-5b6a1d16f1e2f5e91883a67171129854ea125bb5.tar.bz2 perlweeklychallenge-club-5b6a1d16f1e2f5e91883a67171129854ea125bb5.zip | |
1st commit on 021
Diffstat (limited to 'challenge-021')
| -rw-r--r-- | challenge-021/stuart-little/README | 1 | ||||
| -rwxr-xr-x | challenge-021/stuart-little/raku/ch-1.p6 | 8 | ||||
| -rwxr-xr-x | challenge-021/stuart-little/raku/ch-2.p6 | 9 |
3 files changed, 18 insertions, 0 deletions
diff --git a/challenge-021/stuart-little/README b/challenge-021/stuart-little/README new file mode 100644 index 0000000000..78439907de --- /dev/null +++ b/challenge-021/stuart-little/README @@ -0,0 +1 @@ +Solutions by Stuart Little diff --git a/challenge-021/stuart-little/raku/ch-1.p6 b/challenge-021/stuart-little/raku/ch-1.p6 new file mode 100755 index 0000000000..2b1df6b4eb --- /dev/null +++ b/challenge-021/stuart-little/raku/ch-1.p6 @@ -0,0 +1,8 @@ +#!/usr/bin/env perl6 +use v6; + +# run as <script> <number of decimals; defaults to 30> + +use Math::BigFloat:from<Perl5>; + +say Math::BigFloat.new('1').bexp((@*ARGS) ?? @*ARGS[0] !! 30).Str diff --git a/challenge-021/stuart-little/raku/ch-2.p6 b/challenge-021/stuart-little/raku/ch-2.p6 new file mode 100755 index 0000000000..4941268da5 --- /dev/null +++ b/challenge-021/stuart-little/raku/ch-2.p6 @@ -0,0 +1,9 @@ +#!/usr/bin/env perl6 +use v6; + +# run as <script> <URL> + +use URI:from<Perl5>; + +say URI.new(@*ARGS[0]).canonical.Str; + |