diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-02-26 18:10:57 +0000 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-02-26 18:10:57 +0000 |
| commit | a7528d2e63a5d145948508f60e31b9aadefe074e (patch) | |
| tree | c49bbc7afe5dfa04ca13126a0ef620dd8a51fcdc /challenge-049/mohammad-anwar | |
| parent | 6fd74b2f430bede898418de695a2b020e5749a82 (diff) | |
| download | perlweeklychallenge-club-a7528d2e63a5d145948508f60e31b9aadefe074e.tar.gz perlweeklychallenge-club-a7528d2e63a5d145948508f60e31b9aadefe074e.tar.bz2 perlweeklychallenge-club-a7528d2e63a5d145948508f60e31b9aadefe074e.zip | |
- Added blog by Mohammad S Anwar.
Diffstat (limited to 'challenge-049/mohammad-anwar')
| -rw-r--r-- | challenge-049/mohammad-anwar/blog.txt | 1 | ||||
| -rw-r--r-- | challenge-049/mohammad-anwar/raku/ch-1.p6 | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/challenge-049/mohammad-anwar/blog.txt b/challenge-049/mohammad-anwar/blog.txt new file mode 100644 index 0000000000..ce91c81a11 --- /dev/null +++ b/challenge-049/mohammad-anwar/blog.txt @@ -0,0 +1 @@ +https://perlweeklychallenge.org/blog/blog-challenge-049 diff --git a/challenge-049/mohammad-anwar/raku/ch-1.p6 b/challenge-049/mohammad-anwar/raku/ch-1.p6 index 5513491a93..6d9e6467a8 100644 --- a/challenge-049/mohammad-anwar/raku/ch-1.p6 +++ b/challenge-049/mohammad-anwar/raku/ch-1.p6 @@ -2,7 +2,7 @@ use v6; -sub MAIN($num!) { +sub MAIN(Int $num) { my (Int $res, Int $i); repeat { $res = $num * ++$i; } until $res ~~ /^<[01]>+$/; $res.say; |