From 606855b5dacc00b2eb4e630f38484a1d8ddacf4b Mon Sep 17 00:00:00 2001 From: Magnus Woldrich Date: Tue, 2 Apr 2019 08:30:35 +0200 Subject: fix filename to follow naming convention --- challenge-002/magnus-woldrich/perl5/ch-2.pl | 14 ++++++++++++++ challenge-002/magnus-woldrich/perl5/challenge-02.pl | 14 -------------- 2 files changed, 14 insertions(+), 14 deletions(-) create mode 100644 challenge-002/magnus-woldrich/perl5/ch-2.pl delete mode 100644 challenge-002/magnus-woldrich/perl5/challenge-02.pl diff --git a/challenge-002/magnus-woldrich/perl5/ch-2.pl b/challenge-002/magnus-woldrich/perl5/ch-2.pl new file mode 100644 index 0000000000..68440ccbdf --- /dev/null +++ b/challenge-002/magnus-woldrich/perl5/ch-2.pl @@ -0,0 +1,14 @@ +#!/usr/bin/perl +# vim: ft=perl:fdm=marker:fmr=#<,#>:fen:et:sw=2: +use strict; +use warnings FATAL => 'all'; + + +print for map { sprintf "%d\n", $_ } @ARGV ? @ARGV : (@ARGV = readline); + +__END__ + +$ printf "%02d\n%04d\n%042d\n" 1 2 3 | perl challenge-02.pl +1 +2 +3 diff --git a/challenge-002/magnus-woldrich/perl5/challenge-02.pl b/challenge-002/magnus-woldrich/perl5/challenge-02.pl deleted file mode 100644 index 68440ccbdf..0000000000 --- a/challenge-002/magnus-woldrich/perl5/challenge-02.pl +++ /dev/null @@ -1,14 +0,0 @@ -#!/usr/bin/perl -# vim: ft=perl:fdm=marker:fmr=#<,#>:fen:et:sw=2: -use strict; -use warnings FATAL => 'all'; - - -print for map { sprintf "%d\n", $_ } @ARGV ? @ARGV : (@ARGV = readline); - -__END__ - -$ printf "%02d\n%04d\n%042d\n" 1 2 3 | perl challenge-02.pl -1 -2 -3 -- cgit