diff options
| -rw-r--r-- | challenge-058/jaredor/blog.txt | 1 | ||||
| -rwxr-xr-x | challenge-058/jaredor/perl/ch-1.pl | 1 | ||||
| -rwxr-xr-x | challenge-058/jaredor/perl/ch-2.pl | 2 |
3 files changed, 2 insertions, 2 deletions
diff --git a/challenge-058/jaredor/blog.txt b/challenge-058/jaredor/blog.txt new file mode 100644 index 0000000000..266e5e5ba9 --- /dev/null +++ b/challenge-058/jaredor/blog.txt @@ -0,0 +1 @@ +http://blogs.perl.org/users/jared_martin/2020/05/pwc-058-task-1-compare-version-task-2-ordered-lineup.html diff --git a/challenge-058/jaredor/perl/ch-1.pl b/challenge-058/jaredor/perl/ch-1.pl index b2c437d45b..67018e7dce 100755 --- a/challenge-058/jaredor/perl/ch-1.pl +++ b/challenge-058/jaredor/perl/ch-1.pl @@ -2,7 +2,6 @@ use v5.012; # Using keys on arrays use warnings; -use Data::Dump qw(pp); use List::Util qw(max min uniq); # PWC 058, Task #1 : Compare Version diff --git a/challenge-058/jaredor/perl/ch-2.pl b/challenge-058/jaredor/perl/ch-2.pl index ecbc14f8c4..dfded7301d 100755 --- a/challenge-058/jaredor/perl/ch-2.pl +++ b/challenge-058/jaredor/perl/ch-2.pl @@ -7,7 +7,7 @@ use List::Util qw(all any); use List::MoreUtils qw(uniq indexes last_index); # PWC 058, TASK #2 : Ordered Lineup -# + # Write a script to arrange people in a lineup according to how many taller # people are in front of each person in line. You are given two arrays. @H is a # list of unique heights, in any order. @T is a list of how many taller people |