aboutsummaryrefslogtreecommitdiff
path: root/challenge-002/ozzy/README
diff options
context:
space:
mode:
authorAlexander <39702500+threadless-screw@users.noreply.github.com>2019-04-03 20:53:24 +0000
committerGitHub <noreply@github.com>2019-04-03 20:53:24 +0000
commite66c99df361b026bb1b7af6dcfeda8a6607767cf (patch)
treea179525aef51e5e772caa43d18068106b580c9df /challenge-002/ozzy/README
parent4db60445891bf5b0542d858455711b0d11fd5f2d (diff)
downloadperlweeklychallenge-club-e66c99df361b026bb1b7af6dcfeda8a6607767cf.tar.gz
perlweeklychallenge-club-e66c99df361b026bb1b7af6dcfeda8a6607767cf.tar.bz2
perlweeklychallenge-club-e66c99df361b026bb1b7af6dcfeda8a6607767cf.zip
Update README
Diffstat (limited to 'challenge-002/ozzy/README')
-rw-r--r--challenge-002/ozzy/README35
1 files changed, 0 insertions, 35 deletions
diff --git a/challenge-002/ozzy/README b/challenge-002/ozzy/README
index 40d33b4f43..44e39371ef 100644
--- a/challenge-002/ozzy/README
+++ b/challenge-002/ozzy/README
@@ -1,36 +1 @@
Solution by Ozzy
-
-------------
-Challenge 1:
-------------
-The simplest solution I could think of was conversion of a numeric (integer) string through
-the use of the built-in Int method:
-
- my $a = "004" # Example string representing positive integer with leading zeros
- my $b = $a.Int # Convert string to Int using built-in method Int, and so strip zeros
- say $b # Print the Int; OUTPUT: 4
-
-In a Perl6/Bash one-liner, this would look something like this:
-
- perl6 -pe '$_=.Int' <<< 004
-
-but this, in itself, isn't very practical since Bash can do it with even less fuzz:
-
- a="004"
- echo ${a##+(0)}
-
-------------
-Challenge 2:
-------------
-The obvious way to go is probably the use of Perl6' .base and .parse-base methods:
-
-loop {
-
- my Str $a = prompt("\nPlease, give me a decimal (base-10) number : ");
- say("$a in decimal notation is { $a.Int.base(35) } in base-35 notation.");
-
- $a = prompt("\nNow give me a base-35 number [A-Y0-9]: ");
- say("$a in base-35 notation is { $a.parse-base(35) } in base-10 notation.")
-
-}
-