aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorbracteatus <42359730+bracteatus@users.noreply.github.com>2019-04-07 11:50:43 -0600
committerGitHub <noreply@github.com>2019-04-07 11:50:43 -0600
commitb4c8a5952418d6839a45065ee995af627cd615ee (patch)
tree1ef6b3e11dd00a0eb791eed2c5f497deff5ee2a8
parent5b2a0a8345bcbd0d11659b58a2bee039a248babb (diff)
downloadperlweeklychallenge-club-b4c8a5952418d6839a45065ee995af627cd615ee.tar.gz
perlweeklychallenge-club-b4c8a5952418d6839a45065ee995af627cd615ee.tar.bz2
perlweeklychallenge-club-b4c8a5952418d6839a45065ee995af627cd615ee.zip
Create README.md
-rw-r--r--challenge-002/jaime/README.md26
1 files changed, 26 insertions, 0 deletions
diff --git a/challenge-002/jaime/README.md b/challenge-002/jaime/README.md
new file mode 100644
index 0000000000..d9a13f0ca9
--- /dev/null
+++ b/challenge-002/jaime/README.md
@@ -0,0 +1,26 @@
+# Perl Weekly Challenge 002
+By Jaime; @tortsnare on Twitter.
+
+Straightforward solutions in Perl 5 that use no imports.
+The user selects a conversion and feeds in numbers, in a UNIX-like approach.
+
+The faniest bit was an `eval` introduced at the end to toggle the conversion operation at runtime.
+
+# ch-1.pl
+
+Run as a single shell one-liner:
+`perl -E 'while(<>) {s/^0+//;print;}' # interactively reads numbers`
+
+or pipe the numbers, example:
+`cat number_list | perl -E 'while(<>) {s/^0+//;print;}`
+
+# ch-2.pl
+Run as a Perl 5 script.
+
+## Convert base10 into base35
+
+`cat integer_list | perl ch-2.pl`
+
+## Convert base35 into base10
+
+`cat base35_list | perl ch-2.pl --base35-to-int`