diff options
| author | Jörg Sommrey <28217714+jo-37@users.noreply.github.com> | 2020-11-29 10:40:27 +0100 |
|---|---|---|
| committer | Jörg Sommrey <28217714+jo-37@users.noreply.github.com> | 2023-03-23 17:31:20 +0100 |
| commit | 18ef6084b041f50f3d4042d8ee9f0fe0c40daaee (patch) | |
| tree | 038dc1543298a986dd93da6639a5f810bff95117 /challenge-001 | |
| parent | 9c5cd2108a8f6cf8b793c28051fdf8d767a4c8a9 (diff) | |
| download | perlweeklychallenge-club-18ef6084b041f50f3d4042d8ee9f0fe0c40daaee.tar.gz perlweeklychallenge-club-18ef6084b041f50f3d4042d8ee9f0fe0c40daaee.tar.bz2 perlweeklychallenge-club-18ef6084b041f50f3d4042d8ee9f0fe0c40daaee.zip | |
Challenge 001 task 1
Diffstat (limited to 'challenge-001')
| -rwxr-xr-x | challenge-001/jo-37/perl/ch-1.pl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/challenge-001/jo-37/perl/ch-1.pl b/challenge-001/jo-37/perl/ch-1.pl new file mode 100755 index 0000000000..468a16db83 --- /dev/null +++ b/challenge-001/jo-37/perl/ch-1.pl @@ -0,0 +1,10 @@ +#!/usr/bin/perl + +use v5.12; +use strict; +use warnings; + +for ($a = 'Perl Weekly Challenge') { + my $n = y/e/E/; + say "$_: $n"; +} |