aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2021-11-16 12:43:44 +0000
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2021-11-16 12:43:44 +0000
commita8f0adadbe3bcd71c048916c8abed27533074f34 (patch)
tree1bf2e76cb00ca1a3e9d909ba038193acc8e13d8c
parent539750d62489e789280ec4d15a528f353e0c3baf (diff)
downloadperlweeklychallenge-club-a8f0adadbe3bcd71c048916c8abed27533074f34.tar.gz
perlweeklychallenge-club-a8f0adadbe3bcd71c048916c8abed27533074f34.tar.bz2
perlweeklychallenge-club-a8f0adadbe3bcd71c048916c8abed27533074f34.zip
- Added solution by Olivier Delouya.
-rw-r--r--challenge-139/olivier-delouya/perl/ch-1.sh3
-rw-r--r--stats/pwc-challenge-138.json635
-rw-r--r--stats/pwc-current.json646
-rw-r--r--stats/pwc-language-breakdown-summary.json46
-rw-r--r--stats/pwc-language-breakdown.json943
-rw-r--r--stats/pwc-leaders.json720
-rw-r--r--stats/pwc-summary-1-30.json54
-rw-r--r--stats/pwc-summary-121-150.json98
-rw-r--r--stats/pwc-summary-151-180.json56
-rw-r--r--stats/pwc-summary-181-210.json102
-rw-r--r--stats/pwc-summary-211-240.json30
-rw-r--r--stats/pwc-summary-241-270.json46
-rw-r--r--stats/pwc-summary-31-60.json62
-rw-r--r--stats/pwc-summary-61-90.json54
-rw-r--r--stats/pwc-summary-91-120.json112
-rw-r--r--stats/pwc-summary.json44
16 files changed, 1870 insertions, 1781 deletions
diff --git a/challenge-139/olivier-delouya/perl/ch-1.sh b/challenge-139/olivier-delouya/perl/ch-1.sh
new file mode 100644
index 0000000000..6f02c2812c
--- /dev/null
+++ b/challenge-139/olivier-delouya/perl/ch-1.sh
@@ -0,0 +1,3 @@
+perl -se "@N=eval($N); $I=scalar(@N)-1; for($i=0; $i<$I; $i++) { exit(print 0) if($N[$i] > $N[$i+1]);} print 1;" -- -N="(1,2,3,4,5)"
+
+perl -se "@N=eval($N); $I=scalar(@N)-1; for($i=0; $i<$I; $i++) { exit(print 0) if($N[$i] > $N[$i+1]);} print 1;" -- -N="(1,3,2,4,5)"
diff --git a/stats/pwc-challenge-138.json b/stats/pwc-challenge-138.json
new file mode 100644
index 0000000000..4f68fd3610
--- /dev/null
+++ b/stats/pwc-challenge-138.json
@@ -0,0 +1,635 @@
+{
+ "tooltip" : {
+ "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+ "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
+ "followPointer" : 1
+ },
+ "series" : [
+ {
+ "colorByPoint" : 1,
+ "name" : "The Weekly Challenge - 138",
+ "data" : [
+ {
+ "drilldown" : "Abigail",
+ "name" : "Abigail",
+ "y" : 4
+ },
+ {
+ "name" : "Andrew Shitov",
+ "y" : 1,
+ "drilldown" : "Andrew Shitov"
+ },
+ {
+ "drilldown" : "Arne Sommer",
+ "y" : 4,
+ "name" : "Arne Sommer"
+ },
+ {
+ "name" : "Athanasius",
+ "y" : 4,
+ "drilldown" : "Athanasius"
+ },
+ {
+ "name" : "Bob Lied",
+ "y" : 2,
+ "drilldown" : "Bob Lied"
+ },
+ {
+ "y" : 5,
+ "name" : "Bruce Gray",
+ "drilldown" : "Bruce Gray"
+ },
+ {
+ "drilldown" : "Cheok-Yin Fung",
+ "name" : "Cheok-Yin Fung",
+ "y" : 3
+ },
+ {
+ "y" : 2,
+ "name" : "Colin Crain",
+ "drilldown" : "Colin Crain"
+ },
+ {
+ "y" : 3,
+ "name" : "Dave Jacoby",
+ "drilldown" : "Dave Jacoby"
+ },
+ {
+ "drilldown" : "Duncan C. White",
+ "name" : "Duncan C. White",
+ "y" : 2
+ },
+ {
+ "drilldown" : "E. Choroba",
+ "name" : "E. Choroba",
+ "y" : 2
+ },
+ {
+ "y" : 6,
+ "name" : "Flavio Poletti",
+ "drilldown" : "Flavio Poletti"
+ },
+ {
+ "drilldown" : "Jaldhar H. Vyas",
+ "name" : "Jaldhar H. Vyas",
+ "y" : 5
+ },
+ {
+ "drilldown" : "James Smith",
+ "y" : 3,
+ "name" : "James Smith"
+ },
+ {
+ "name" : "Jan Krnavek",
+ "y" : 2,
+ "drilldown" : "Jan Krnavek"
+ },
+ {
+ "drilldown" : "Jorg Sommrey",
+ "name" : "Jorg Sommrey",
+ "y" : 2
+ },
+ {
+ "y" : 5,
+ "name" : "Laurent Rosenfeld",
+ "drilldown" : "Laurent Rosenfeld"
+ },
+ {
+ "drilldown" : "Lubos Kolouch",
+ "name" : "Lubos Kolouch",
+ "y" : 2
+ },
+ {
+ "drilldown" : "Luca Ferrari",
+ "name" : "Luca Ferrari",
+ "y" : 6
+ },
+ {
+ "name" : "Mark Anderson",
+ "y" : 2,
+ "drilldown" : "Mark Anderson"
+ },
+ {
+ "drilldown" : "Matthew Neleigh",
+ "name" : "Matthew Neleigh",
+ "y" : 1
+ },
+ {
+ "name" : "Mohammad S Anwar",
+ "y" : 2,
+ "drilldown" : "Mohammad S Anwar"
+ },
+ {
+ "name" : "Niels van Dijke",
+ "y" : 2,
+ "drilldown" : "Niels van Dijke"
+ },
+ {
+ "drilldown" : "Paulo Custodio",
+ "name" : "Paulo Custodio",
+ "y" : 2
+ },
+ {
+ "y" : 2,
+ "name" : "Pete Houston",
+ "drilldown" : "Pete Houston"
+ },
+ {
+ "y" : 2,
+ "name" : "Peter Campbell Smith",
+ "drilldown" : "Peter Campbell Smith"
+ },
+ {
+ "drilldown" : "Robert DiCicco",
+ "y" : 2,
+ "name" : "Robert DiCicco"
+ },
+ {
+ "drilldown" : "Roger Bell_West",
+ "y" : 5,
+ "name" : "Roger Bell_West"
+ },
+ {
+ "drilldown" : "Simon Green",
+ "y" : 3,
+ "name" : "Simon Green"
+ },
+ {
+ "drilldown" : "Steven Wilson",
+ "name" : "Steven Wilson",
+ "y" : 2
+ },
+ {
+ "drilldown" : "Ulrich Rieke",
+ "name" : "Ulrich Rieke",
+ "y" : 4
+ },
+ {
+ "y" : 3,
+ "name" : "W. Luis Mochan",
+ "drilldown" : "W. Luis Mochan"
+ },
+ {
+ "drilldown" : "Wanderdoc",
+ "y" : 2,
+ "name" : "Wanderdoc"
+ }
+ ]
+ }
+ ],
+ "subtitle" : {
+ "text" : "[Champions: 33] Last updated at 2021-11-16 12:40:20 GMT"
+ },
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
+ }
+ },
+ "xAxis" : {
+ "type" : "category"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "legend" : {
+ "enabled" : 0
+ },
+ "title" : {
+ "text" : "The Weekly Challenge - 138"
+ },
+ "drilldown" : {
+ "series" : [
+ {
+ "id" : "Abigail",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 2
+ ]
+ ],
+ "name" : "Abigail"
+ },
+ {
+ "name" : "Andrew Shitov",
+ "data" : [
+ [
+ "Raku",
+ 1
+ ]
+ ],
+ "id" : "Andrew Shitov"
+ },
+ {
+ "name" : "Arne Sommer",
+ "data" : [
+ [
+ "Perl",
+ 1
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "id" : "Arne Sommer"
+ },
+ {
+ "name" : "Athanasius",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ]
+ ],
+ "id" : "Athanasius"
+ },
+ {
+ "id" : "Bob Lied",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "name" : "Bob Lied"
+ },
+ {
+ "name" : "Bruce Gray",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "id" : "Bruce Gray"
+ },
+ {
+ "id" : "Cheok-Yin Fung",
+ "name" : "Cheok-Yin Fung",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ]
+ },
+ {
+ "name" : "Colin Crain",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "id" : "Colin Crain"
+ },
+ {
+ "id" : "Dave Jacoby",
+ "name" : "Dave Jacoby",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ]
+ },
+ {
+ "name" : "Duncan C. White",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "id" : "Duncan C. White"
+ },
+ {
+ "name" : "E. Choroba",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "id" : "E. Choroba"
+ },
+ {
+ "id" : "Flavio Poletti",
+ "name" : "Flavio Poletti",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 2
+ ]
+ ]
+ },
+ {
+ "name" : "Jaldhar H. Vyas",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "id" : "Jaldhar H. Vyas"
+ },
+ {
+ "id" : "James Smith",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "name" : "James Smith"
+ },
+ {
+ "data" : [
+ [
+ "Raku",
+ 2
+ ]
+ ],
+ "name" : "Jan Krnavek",
+ "id" : "Jan Krnavek"
+ },
+ {
+ "id" : "Jorg Sommrey",
+ "name" : "Jorg Sommrey",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ]
+ },
+ {
+ "id" : "Laurent Rosenfeld",
+ "name" : "Laurent Rosenfeld",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ]
+ },
+ {
+ "id" : "Lubos Kolouch",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "name" : "Lubos Kolouch"
+ },
+ {
+ "data" : [
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 4
+ ]
+ ],
+ "name" : "Luca Ferrari",
+ "id" : "Luca Ferrari"
+ },
+ {
+ "name" : "Mark Anderson",
+ "data" : [
+ [
+ "Raku",
+ 2
+ ]
+ ],
+ "id" : "Mark Anderson"
+ },
+ {
+ "id" : "Matthew Neleigh",
+ "name" : "Matthew Neleigh",
+ "data" : [
+ [
+ "Perl",
+ 1
+ ]
+ ]
+ },
+ {
+ "name" : "Mohammad S Anwar",
+ "data" : [
+ [
+ "Perl",
+ 1
+ ],
+ [
+ "Raku",
+ 1
+ ]
+ ],
+ "id" : "Mohammad S Anwar"
+ },
+ {
+ "id" : "Niels van Dijke",
+ "name" : "Niels van Dijke",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ]
+ },
+ {
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "name" : "Paulo Custodio",
+ "id" : "Paulo Custodio"
+ },
+ {
+ "id" : "Pete Houston",
+ "name" : "Pete Houston",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ]
+ },
+ {
+ "id" : "Peter Campbell Smith",
+ "name" : "Peter Campbell Smith",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ]
+ },
+ {
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "name" : "Robert DiCicco",
+ "id" : "Robert DiCicco"
+ },
+ {
+ "name" : "Roger Bell_West",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "id" : "Roger Bell_West"
+ },
+ {
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "name" : "Simon Green",
+ "id" : "Simon Green"
+ },
+ {
+ "name" : "Steven Wilson",
+ "data" : [
+ [
+ "Perl",
+ 1
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "id" : "Steven Wilson"
+ },
+ {
+ "id" : "Ulrich Rieke",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Raku",
+ 2
+ ]
+ ],
+ "name" : "Ulrich Rieke"
+ },
+ {
+ "data" : [
+ [
+ "Perl",
+ 2
+ ],
+ [
+ "Blog",
+ 1
+ ]
+ ],
+ "name" : "W. Luis Mochan",
+ "id" : "W. Luis Mochan"
+ },
+ {
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
+ ],
+ "name" : "Wanderdoc",
+ "id" : "Wanderdoc"
+ }
+ ]
+ },
+ "plotOptions" : {
+ "series" : {
+ "dataLabels" : {
+ "format" : "{point.y}",
+ "enabled" : 1
+ },
+ "borderWidth" : 0
+ }
+ }
+}
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 453b74473c..7c24f8da45 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,635 +1,63 @@
{
- "legend" : {
- "enabled" : 0
+ "plotOptions" : {
+ "series" : {
+ "borderWidth" : 0,
+ "dataLabels" : {
+ "enabled" : 1,
+ "format" : "{point.y}"
+ }
+ }
},
"yAxis" : {
"title" : {
"text" : "Total Solutions"
}
},
- "chart" : {
- "type" : "column"
- },
"title" : {
- "text" : "The Weekly Challenge - 138"
+ "text" : "The Weekly Challenge - 139"
},
- "tooltip" : {
- "headerFormat" : "<span style='font-size:11px'>{series.name}</span><br/>",
- "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
- "followPointer" : 1
+ "xAxis" : {
+ "type" : "category"
},
- "plotOptions" : {
- "series" : {
- "dataLabels" : {
- "enabled" : 1,
- "format" : "{point.y}"
- },
- "borderWidth" : 0
- }
+ "legend" : {
+ "enabled" : 0
+ },
+ "subtitle" : {
+ "text" : "[Champions: 1] Last updated at 2021-11-16 12:42:13 GMT"
},
- "series" : [
- {
- "data" : [
- {
- "y" : 4,
- "name" : "Abigail",
- "drilldown" : "Abigail"
- },
- {
- "y" : 1,
- "name" : "Andrew Shitov",
- "drilldown" : "Andrew Shitov"
- },
- {
- "drilldown" : "Arne Sommer",
- "y" : 4,
- "name" : "Arne Sommer"
- },
- {
- "drilldown" : "Athanasius",
- "name" : "Athanasius",
- "y" : 4
- },
- {
- "y" : 2,
- "name" : "Bob Lied",
- "drilldown" : "Bob Lied"
- },
- {
- "name" : "Bruce Gray",
- "y" : 5,
- "drilldown" : "Bruce Gray"
- },
- {
- "drilldown" : "Cheok-Yin Fung",
- "name" : "Cheok-Yin Fung",
- "y" : 3
- },
- {
- "drilldown" : "Colin Crain",
- "y" : 2,
- "name" : "Colin Crain"
- },
- {
- "y" : 3,
- "name" : "Dave Jacoby",
- "drilldown" : "Dave Jacoby"
- },
- {
- "name" : "Duncan C. White",
- "y" : 2,
- "drilldown" : "Duncan C. White"
- },
- {
- "name" : "E. Choroba",
- "y" : 2,
- "drilldown" : "E. Choroba"
- },
- {
- "y" : 6,
- "name" : "Flavio Poletti",
- "drilldown" : "Flavio Poletti"
- },
- {
- "y" : 5,
- "name" : "Jaldhar H. Vyas",
- "drilldown" : "Jaldhar H. Vyas"
- },
- {
- "name" : "James Smith",
- "y" : 3,
- "drilldown" : "James Smith"
- },
- {
- "name" : "Jan Krnavek",
- "y" : 2,
- "drilldown" : "Jan Krnavek"
- },
- {
- "drilldown" : "Jorg Sommrey",
- "y" : 2,
- "name" : "Jorg Sommrey"
- },
- {
- "drilldown" : "Laurent Rosenfeld",
- "y" : 5,
- "name" : "Laurent Rosenfeld"
- },
- {
- "drilldown" : "Lubos Kolouch",
- "name" : "Lubos Kolouch",
- "y" : 2
- },
- {
- "name" : "Luca Ferrari",
- "y" : 6,
- "drilldown" : "Luca Ferrari"
- },
- {
- "drilldown" : "Mark Anderson",
- "name" : "Mark Anderson",
- "y" : 2
- },
- {
- "y" : 1,
- "name" : "Matthew Neleigh",
- "drilldown" : "Matthew Neleigh"
- },
- {
- "drilldown" : "Mohammad S Anwar",
- "y" : 2,
- "name" : "Mohammad S Anwar"
- },
- {
- "drilldown" : "Niels van Dijke",
- "y" : 2,
- "name" : "Niels van Dijke"
- },
- {
- "drilldown" : "Paulo Custodio",
- "y" : 2,
- "name" : "Paulo Custodio"
- },
- {
- "name" : "Pete Houston",
- "y" : 2,
- "drilldown" : "Pete Houston"
- },
- {
- "drilldown" : "Peter Campbell Smith",
- "name" : "Peter Campbell Smith",
- "y" : 2
- },
- {
- "name" : "Robert DiCicco",
- "y" : 2,
- "drilldown" : "Robert DiCicco"
- },
- {
- "y" : 5,
- "name" : "Roger Bell_West",
- "drilldown" : "Roger Bell_West"
- },
- {
- "name" : "Simon Green",
- "y" : 3,
- "drilldown" : "Simon Green"
- },
- {
- "drilldown" : "Steven Wilson",
- "y" : 2,
- "name" : "Steven Wilson"
- },
- {
- "drilldown" : "Ulrich Rieke",
- "y" : 4,
- "name" : "Ulrich Rieke"
- },
- {
- "drilldown" : "W. Luis Mochan",
- "name" : "W. Luis Mochan",
- "y" : 3
- },
- {
- "name" : "Wanderdoc",
- "y" : 2,
- "drilldown" : "Wanderdoc"
- }
- ],
- "colorByPoint" : 1,
- "name" : "The Weekly Challenge - 138"
- }
- ],
"drilldown" : {
"series" : [
{
- "id" : "Abigail",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Blog",
- 2
- ]
- ],
- "name" : "Abigail"
- },
- {
- "id" : "Andrew Shitov",
- "name" : "Andrew Shitov",
- "data" : [
- [
- "Raku",
- 1
- ]
- ]
- },
- {
- "id" : "Arne Sommer",
- "data" : [
- [
- "Perl",
- 1
- ],
- [
- "Raku",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "name" : "Arne Sommer"
- },
- {
- "name" : "Athanasius",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Raku",
- 2
- ]
- ],
- "id" : "Athanasius"
- },
- {
- "data" : [
- [
- "Perl",
- 2
- ]
- ],
- "name" : "Bob Lied",
- "id" : "Bob Lied"
- },
- {
- "id" : "Bruce Gray",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Raku",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "name" : "Bruce Gray"
- },
- {
- "id" : "Cheok-Yin Fung",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "name" : "Cheok-Yin Fung"
- },
- {
- "id" : "Colin Crain",
- "name" : "Colin Crain",
- "data" : [
- [
- "Perl",
- 2
- ]
- ]
- },
- {
- "name" : "Dave Jacoby",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "id" : "Dave Jacoby"
- },
- {
- "id" : "Duncan C. White",
- "name" : "Duncan C. White",
- "data" : [
- [
- "Perl",
- 2
- ]
- ]
- },
- {
- "name" : "E. Choroba",
- "data" : [
- [
- "Perl",
- 2
- ]
- ],
- "id" : "E. Choroba"
- },
- {
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Raku",
- 2
- ],
- [
- "Blog",
- 2
- ]
- ],
- "name" : "Flavio Poletti",
- "id" : "Flavio Poletti"
- },
- {
- "name" : "Jaldhar H. Vyas",
+ "id" : "Olivier Delouya",
"data" : [
[
"Perl",
- 2
- ],
- [
- "Raku",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "id" : "Jaldhar H. Vyas"
- },
- {
- "id" : "James Smith",
- "name" : "James Smith",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ]
- },
- {
- "name" : "Jan Krnavek",
- "data" : [
- [
- "Raku",
- 2
- ]
- ],
- "id" : "Jan Krnavek"
- },
- {
- "name" : "Jorg Sommrey",
- "data" : [
- [
- "Perl",
- 2
- ]
- ],
- "id" : "Jorg Sommrey"
- },
- {
- "name" : "Laurent Rosenfeld",
- "data" : [
- [
- "Perl",
- 2
- ],
- [
- "Raku",
- 2
- ],
- [
- "Blog",
- 1
- ]
- ],
- "id" : "Laurent Rosenfeld"
- },
- {
- "name" : "Lubos Kolouch",
- "data" : [
- [
- "Perl",