HEADLINES
Last week, we had guest contributor, Richard Park, who contributed APL solutions. Roger Bell_West shared blogs for Week 048 and Week 049. Athansius shared solutions to the last week challenge after a short break. Welcome back Athanasius.
I would like to share an interesting bit from Perl Reviews 050 by Ryan Thompson. In his review, Ryan improved my definition of the subroutine _order_intervals() as defined below:
sub _order_intervals {
my ($intervals) = @_;
my @intervals = ();
foreach my $i (@$intervals) {
push @intervals, sprintf("%d-%d", $i->[0], $i->[1]);
}
# Borrowed with input from E. Choroba
# https://stackoverflow.com/questions/27089498/sorting-arrays-of-intervals-in-perl
my @_sorted = sort {
my ($a1, $a2) = $a =~ /-?\d+/g;
my ($b1, $b2) = $b =~ /-?\d+/g;
$a1 <=> $b1 || $a2 <=> $b2;
} @intervals;
my $sorted = [];
foreach (@_sorted) {
my ($a, $b) = split /(?<=\d)-(?=\d)/, $_, 2;
push @$sorted, [ $a+0, $b+0 ];
}
return $sorted;
}
to something like this. I feel like dumb now.
sub _order_intervals {
[ sort { $a->[0] <=> $b->[0] || $a->[1] <=> $b->[1] } @{$_[0]} ]
}
GUESTS REPORT CARD
1) Ulrich Rieke: C++ (10), Haskell (11).
2) Orestis Zekai: Python (16).
3) Lubos Kolouch: Python (16).
4) User Person: Python (12).
5) Adam Russell: C++ (8).
6) Burkhard Nickels: Python (8).
7) Wanderdoc: R (6).
8) Kivanc Yazan: Python (4).
9) Duncan C. White: Postscript (3).
10) Jonas Berlin: Rust (3).
11) Rage311: Rust (3).
12) Daniel Mita: Go (1), Javascript (1).
13) Richard Park: APL (2).
14) Roger Bell_West: Postscript (2).
15) Darren Bottin: Prolog (1).
16) Dave Jacoby: HTML (1).
17) Jaldhar H. Vyas: C++ (1).
LANGUAGES REPORT CARD
1) Python: 56
2) C++: 19
3) Haskell: 11
4) Rust: 6
5) R: 6
6) Postscript: 5
7) APL: 2
8) Go: 1
9) HTML: 1
10) Javascript: 1
11) Prolog: 1
CENTURION CLUB
Changes to the ranking in the Centurion Club last week listed below
With last week contributions, I have now moved up to the rank #042. Lubos Kolouch joined the club last week. Many congratulations from the Team PWC.
Roger Bell_West moved up to the rank #06.
Lubos Kolouch moved up to the rank #025.
1) Laurent Rosenfeld (620)
2) Jaldhar H. Vyas (436)
3) Ruben Westerberg (412)
4) Joelle Maslak (334)
5) Arne Sommer (322)
6) Roger Bell_West (318)
7) Adam Russell (306)
8) E. Choroba (282)
9) Ryan Thompson (242)
10) Athanasius (224)
11) Javier Luque (220)
12) Andrezgz (210)
13) Scimon Proctor (204)
14) Dave Jacoby (186)
15) Duncan C. White (184)
16) Kian-Meng Ang (162)
17) Colin Crain (158)
18) Kevin Colyer (152)
19) Yet Ebreo (142)
20) Duane Powell (136)
21) Steven Wilson (136)
22) Noud Aldenhoven (124)
23) Burkhard Nickels (108)
24) Ulrich Rieke (108)
25) Lubos Kolouch (100)
DAMIAN’s CORNER
Checkout the masterpiece collection of blogs by Damian Conway solving “Perl Weekly Challenge”.
PERL SOLUTIONS
Andrezgz
Athanasius
Cheok-Yin Fung
Cristina Heredia
Dave Cross
Dave Jacoby
Duncan C. White
E. Choroba
Lubos Kolouch
Saif Ahmed
User Person
Wanderdoc
Yet Ebreo
RAKU SOLUTIONS
Arne Sommer
Kevin Colyer
Luca Ferrari
[RAKU #1] [RAKU #2] [BLOG #1] [BLOG #2]
Mark Anderson
Noud Aldenhoven
Scimon Proctor
[RAKU #1]
PERL & RAKU SOLUTIONS
Alicia Bielsa
Colin Crain
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2]
Javier Luque
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2] [BLOG #1]
Laurent Rosenfeld
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2] [BLOG #1]
Markus Holzer
Mohammad S Anwar
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2] [BLOG #1]
Roger Bell_West
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2]
Ruben Westerberg
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2]
Ryan Thompson
[PERL #1] [PERL #2] [RAKU #1] [RAKU #2] [BLOG #1] [BLOG #2]
Last but not the least, I would like to request all members, please send us your photo, that you already use on some other web platform, to use in the weekly blog, if not already sent.