aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--challenge-055/mohammad-anwar/perl/ch-2.pl35
-rw-r--r--challenge-055/mohammad-anwar/perl/ch-2a.pl54
-rw-r--r--stats/pwc-current.json140
-rw-r--r--stats/pwc-language-breakdown-summary.json62
-rw-r--r--stats/pwc-language-breakdown.json802
-rw-r--r--stats/pwc-leaders.json722
-rw-r--r--stats/pwc-summary-1-30.json38
-rw-r--r--stats/pwc-summary-121-150.json36
-rw-r--r--stats/pwc-summary-151-180.json44
-rw-r--r--stats/pwc-summary-31-60.json46
-rw-r--r--stats/pwc-summary-61-90.json38
-rw-r--r--stats/pwc-summary-91-120.json104
-rw-r--r--stats/pwc-summary.json44
13 files changed, 1127 insertions, 1038 deletions
diff --git a/challenge-055/mohammad-anwar/perl/ch-2.pl b/challenge-055/mohammad-anwar/perl/ch-2.pl
new file mode 100644
index 0000000000..50942699c1
--- /dev/null
+++ b/challenge-055/mohammad-anwar/perl/ch-2.pl
@@ -0,0 +1,35 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Algorithm::Combinatorics qw(permutations);
+
+my $N = $ARGV[0] // 4;
+die "ERROR: Invalid array size [$N]\n" unless ($N =~ /^\d+$/ && $N > 0);
+
+my $iter = permutations([ 1..$N ]);
+my $wave = [];
+while (my $array = $iter->next) {
+ push @$wave, $array if is_wave($array);
+}
+map { print sprintf("[%s]\n", join(",", @$_)) } @$wave;
+
+sub is_wave {
+ my ($array) = @_;
+
+ my $is_wave = 1;
+ foreach my $i (1..$#$array) {
+ ($i % 2)
+ ?
+ ($array->[$i] <= $array->[$i-1])
+ :
+ ($array->[$i] >= $array->[$i-1])
+ and next;
+
+ $is_wave = 0;
+ last;
+ }
+
+ return $is_wave;
+}
diff --git a/challenge-055/mohammad-anwar/perl/ch-2a.pl b/challenge-055/mohammad-anwar/perl/ch-2a.pl
new file mode 100644
index 0000000000..109bcc116a
--- /dev/null
+++ b/challenge-055/mohammad-anwar/perl/ch-2a.pl
@@ -0,0 +1,54 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Test::More;
+use Test::Deep;
+use Algorithm::Combinatorics qw(permutations);
+
+my $unit_tests = {
+ 1 => [ [1] ],
+ 2 => [ [2,1] ],
+ 3 => [ [2,1,3], [3,1,2] ],
+ 4 => [ [2,1,4,3], [3,1,4,2], [3,2,4,1], [4,1,3,2], [4,2,3,1] ],
+};
+
+foreach my $size (sort { $a <=> $b } keys %$unit_tests) {
+ cmp_deeply(fetch_wave_array($size), $unit_tests->{$size}, "array size $size.");
+}
+
+done_testing;
+
+sub fetch_wave_array {
+ my ($N) = @_;
+
+ die "ERROR: Invalid array size [$N]\n" unless ($N =~ /^\d+$/ && $N > 0);
+
+ my $iter = permutations([ 1..$N ]);
+ my $wave = [];
+ while (my $array = $iter->next) {
+ push @$wave, $array if is_wave($array);
+ }
+
+ return $wave;
+}
+
+sub is_wave {
+ my ($array) = @_;
+
+ my $is_wave = 1;
+ foreach my $i (1..$#$array) {
+ ($i % 2)
+ ?
+ ($array->[$i] <= $array->[$i-1])
+ :
+ ($array->[$i] >= $array->[$i-1])
+ and next;
+
+ $is_wave = 0;
+ last;
+ }
+
+ return $is_wave;
+}
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 5d39ffac11..32a7c44bdf 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,49 +1,35 @@
{
"plotOptions" : {
"series" : {
+ "borderWidth" : 0,
"dataLabels" : {
"enabled" : 1,
"format" : "{point.y}"
- },
- "borderWidth" : 0
+ }
}
},
- "xAxis" : {
- "type" : "category"
- },
- "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
+ "subtitle" : {
+ "text" : "[Champions: 14] Last updated at 2020-04-12 07:39:11 GMT"
},
"yAxis" : {
"title" : {
"text" : "Total Solutions"
}
},
- "legend" : {
- "enabled" : 0
- },
- "chart" : {
- "type" : "column"
- },
- "title" : {
- "text" : "Perl Weekly Challenge - 055"
- },
"drilldown" : {
"series" : [
{
- "name" : "Andrezgz",
"id" : "Andrezgz",
"data" : [
[
"Perl",
2
]
- ]
+ ],
+ "name" : "Andrezgz"
},
{
- "id" : "Arne Sommer",
+ "name" : "Arne Sommer",
"data" : [
[
"Raku",
@@ -54,19 +40,21 @@
1
]
],
- "name" : "Arne Sommer"
+ "id" : "Arne Sommer"
},
{
- "id" : "Dave Jacoby",
"data" : [
[
"Perl",
2
]
],
- "name" : "Dave Jacoby"
+ "name" : "Dave Jacoby",
+ "id" : "Dave Jacoby"
},
{
+ "id" : "Javier Luque",
+ "name" : "Javier Luque",
"data" : [
[
"Perl",
@@ -80,21 +68,20 @@
"Blog",
1
]
- ],
- "id" : "Javier Luque",
- "name" : "Javier Luque"
+ ]
},
{
+ "id" : "Lubos Kolouch",
"data" : [
[
"Perl",
2
]
],
- "id" : "Lubos Kolouch",
"name" : "Lubos Kolouch"
},
{
+ "id" : "Luca Ferrari",
"data" : [
[
"Raku",
@@ -105,7 +92,6 @@
2
]
],
- "id" : "Luca Ferrari",
"name" : "Luca Ferrari"
},
{
@@ -120,20 +106,19 @@
},
{
"name" : "Mohammad S Anwar",
- "id" : "Mohammad S Anwar",
"data" : [
[
"Perl",
- 1
+ 2
],
[
"Raku",
1
]
- ]
+ ],
+ "id" : "Mohammad S Anwar"
},
{
- "name" : "Roger Bell West",
"data" : [
[
"Perl",
@@ -144,6 +129,7 @@
1
]
],
+ "name" : "Roger Bell West",
"id" : "Roger Bell West"
},
{
@@ -153,21 +139,20 @@
2
]
],
- "id" : "Saif Ahmed",
- "name" : "Saif Ahmed"
+ "name" : "Saif Ahmed",
+ "id" : "Saif Ahmed"
},
{
- "id" : "Simon Proctor",
"data" : [
[
"Raku",
2
]
],
- "name" : "Simon Proctor"
+ "name" : "Simon Proctor",
+ "id" : "Simon Proctor"
},
{
- "name" : "Ulrich Rieke",
"id" : "Ulrich Rieke",
"data" : [
[
@@ -178,7 +163,8 @@
"Raku",
2
]
- ]
+ ],
+ "name" : "Ulrich Rieke"
},
{
"data" : [
@@ -187,79 +173,79 @@
2
]
],
- "id" : "Wanderdoc",
- "name" : "Wanderdoc"
+ "name" : "Wanderdoc",
+ "id" : "Wanderdoc"
},
{
- "id" : "Yet Ebreo",
+ "name" : "Yet Ebreo",
"data" : [
[
"Perl",
2
]
],
- "name" : "Yet Ebreo"
+ "id" : "Yet Ebreo"
}
]
},
"series" : [
{
- "colorByPoint" : 1,
+ "name" : "Perl Weekly Challenge - 055",
"data" : [
{
"name" : "Andrezgz",
- "y" : 2,
- "drilldown" : "Andrezgz"
+ "drilldown" : "Andrezgz",
+ "y" : 2
},
{
- "y" : 3,
"name" : "Arne Sommer",
- "drilldown" : "Arne Sommer"
+ "drilldown" : "Arne Sommer",
+ "y" : 3
},
{
- "drilldown" : "Dave Jacoby",
"y" : 2,
+ "drilldown" : "Dave Jacoby",
"name" : "Dave Jacoby"
},
{
- "y" : 5,
"name" : "Javier Luque",
+ "y" : 5,
"drilldown" : "Javier Luque"
},
{
- "drilldown" : "Lubos Kolouch",
"name" : "Lubos Kolouch",
- "y" : 2
+ "y" : 2,
+ "drilldown" : "Lubos Kolouch"
},
{
"y" : 4,
- "name" : "Luca Ferrari",
- "drilldown" : "Luca Ferrari"
+ "drilldown" : "Luca Ferrari",
+ "name" : "Luca Ferrari"
},
{
- "drilldown" : "Mark Anderson",
+ "name" : "Mark Anderson",
"y" : 2,
- "name" : "Mark Anderson"
+ "drilldown" : "Mark Anderson"
},
{
- "drilldown" : "Mohammad S Anwar",
"name" : "Mohammad S Anwar",
- "y" : 2
+ "drilldown" : "Mohammad S Anwar",
+ "y" : 3
},
{
"y" : 3,
- "name" : "Roger Bell West",
- "drilldown" : "Roger Bell West"
+ "drilldown" : "Roger Bell West",
+ "name" : "Roger Bell West"
},
{
"y" : 2,
- "name" : "Saif Ahmed",
- "drilldown" : "Saif Ahmed"
+ "drilldown" : "Saif Ahmed",
+ "name" : "Saif Ahmed"
},
{
"name" : "Simon Proctor",
- "y" : 2,
- "drilldown" : "Simon Proctor"
+ "drilldown" : "Simon Proctor",
+ "y" : 2
},
{
"name" : "Ulrich Rieke",
@@ -267,20 +253,34 @@
"drilldown" : "Ulrich Rieke"
},
{
- "name" : "Wanderdoc",
+ "drilldown" : "Wanderdoc",
"y" : 2,
- "drilldown" : "Wanderdoc"
+ "name" : "Wanderdoc"
},
{
- "drilldown" : "Yet Ebreo",
"name" : "Yet Ebreo",
+ "drilldown" : "Yet Ebreo",
"y" : 2
}
],
- "name" : "Perl Weekly Challenge - 055"
+ "colorByPoint" : 1
}
],
- "subtitle" : {
- "text" : "[Champions: 14] Last updated at 2020-04-12 01:17:07 GMT"
+ "xAxis" : {
+ "type" : "category"
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "title" : {
+ "text" : "Perl Weekly Challenge - 055"
+ },
+ "tooltip" : {
+ "followPointer" : 1,
+ "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/>"
+ },
+ "legend" : {
+ "enabled" : 0
}
}
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 1fee3a8b4d..a48a4c3642 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,46 +1,33 @@
{
+ "title" : {
+ "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+ },
+ "tooltip" : {
+ "pointFormat" : "<b>{point.y:.0f}</b>"
+ },
+ "legend" : {
+ "enabled" : "false"
+ },
+ "subtitle" : {
+ "text" : "Last updated at 2020-04-12 07:39:11 GMT"
+ },
"xAxis" : {
"labels" : {
"style" : {
- "fontSize" : "13px",
- "fontFamily" : "Verdana, sans-serif"
+ "fontFamily" : "Verdana, sans-serif",
+ "fontSize" : "13px"
}
},
"type" : "category"
},
- "tooltip" : {
- "pointFormat" : "<b>{point.y:.0f}</b>"
- },
"yAxis" : {
"title" : {
"text" : null
},
"min" : 0
},
- "legend" : {
- "enabled" : "false"
- },
- "chart" : {
- "type" : "column"
- },
- "title" : {
- "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
- },
"series" : [
{
- "dataLabels" : {
- "align" : "right",
- "y" : 10,
- "enabled" : "true",
- "rotation" : -90,
- "style" : {
- "fontFamily" : "Verdana, sans-serif",
- "fontSize" : "13px"
- },
- "color" : "#FFFFFF",
- "format" : "{point.y:.0f}"
- },
- "name" : "Contributions",
"data" : [
[
"Blog",
@@ -48,16 +35,29 @@
],
[
"Perl",
- 2318
+ 2319
],
[
"Raku",
1447
]
- ]
+ ],
+ "dataLabels" : {
+ "y" : 10,
+ "format" : "{point.y:.0f}",
+ "align" : "right",
+ "color" : "#FFFFFF",
+ "rotation" : -90,
+ "enabled" : "true",
+ "style" : {
+ "fontFamily" : "Verdana, sans-serif",
+ "fontSize" : "13px"
+ }
+ },
+ "name" : "Contributions"
}
],
- "subtitle" : {
- "text" : "Last updated at 2020-04-12 01:17:07 GMT"
+ "chart" : {
+ "type" : "column"
}
}
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 9cab589d12..737875aab1 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -1,295 +1,37 @@
{
+ "title" : {
+ "text" : "Perl Weekly Challenge Language"
+ },
+ "tooltip" : {
+ "followPointer" : "true",
+ "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>",
+ "headerFormat" : "<span style=\"font-size:11px\"></span>"
+ },
+ "legend" : {
+ "enabled" : "false"
+ },
+ "plotOptions" : {
+ "series" : {
+ "borderWidth" : 0,
+ "dataLabels" : {
+ "enabled" : 1,
+ "format" : "{point.y}"
+ }
+ }
+ },
"subtitle" : {
- "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-04-12 01:17:07 GMT"
+ "text" : "Click the columns to drilldown the language breakdown. Last updated at 2020-04-12 07:39:11 GMT"
},
- "series" : [
- {
- "name" : "Perl Weekly Challenge Languages",
- "data" : [
- {
- "drilldown" : "001",
- "y" : 140,
- "name" : "#001"
- },
- {
- "y" : 109,
- "name" : "#002",
- "drilldown" : "002"
- },
- {
- "name" : "#003",
- "y" : 71,
- "drilldown" : "003"
- },
- {
- "name" : "#004",
- "y" : 91,
- "drilldown" : "004"
- },
- {
- "name" : "#005",
- "y" : 71,
- "drilldown" : "005"
- },
- {
- "name" : "#006",
- "y" : 52,
- "drilldown" : "006"
- },
- {
- "name" : "#007",
- "y" : 58,
- "drilldown" : "007"
- },
- {
- "y" : 70,
- "name" : "#008",
- "drilldown" : "008"
- },
- {
- "drilldown" : "009",
- "name" : "#009",
- "y" : 68
- },
- {
- "name" : "#010",
- "y" : 60,
- "drilldown" : "010"
- },
- {
- "drilldown" : "011",
- "name" : "#011",
- "y" : 79
- },
- {
- "name" : "#012",
- "y" : 83,
- "drilldown" : "012"
- },
- {
- "drilldown" : "013",
- "y" : 76,
- "name" : "#013"
- },
- {
- "y" : 96,
- "name" : "#014",
- "drilldown" : "014"
- },
- {
- "drilldown" : "015",
- "name" : "#015",
- "y" : 93
- },
- {
- "y" : 66,
- "name" : "#016",
- "drilldown" : "016"
- },
- {
- "drilldown" : "017",
- "name" : "#017",
- "y" : 79
- },
- {
- "name" : "#018",
- "y" : 76,
- "drilldown" : "018"
- },
- {
- "drilldown" : "019",
- "y" : 97,
- "name" : "#019"
- },
- {
- "drilldown" : "020",
- "y" : 95,
- "name" : "#020"
- },
- {
- "drilldown" : "021",
- "y" : 67,
- "name" : "#021"
- },
- {
- "drilldown" : "022",
- "y" : 63,
- "name" : "#022"
- },
- {
- "drilldown" : "023",
- "name" : "#023",
- "y" : 91
- },
- {
- "y" : 70,
- "name" : "#024",
- "drilldown" : "024"
- },
- {
- "y" : 55,
- "name" : "#025",
- "drilldown" : "025"
- },
- {
- "drilldown" : "026",
- "name" : "#026",
- "y" : 70
- },
- {
- "drilldown" : "027",
- "y" : 58,
- "name" : "#027"
- },
- {
- "y" : 78,
- "name" : "#028",
- "drilldown" : "028"
- },
- {
- "y" : 77,
- "name" : "#029",
- "drilldown" : "029"
- },
- {
- "y" : 115,
- "name" : "#030",
- "drilldown" : "030"
- },
- {
- "drilldown" : "031",
- "name" : "#031",
- "y" : 87
- },
- {
- "drilldown" : "032",
- "name" : "#032",
- "y" : 92
- },
- {
- "name" : "#033",
- "y" : 108,
- "drilldown" : "033"
- },
- {
- "y" : 62,
- "name" : "#034",
- "drilldown" : "034"
- },
- {
- "y" : 62,
- "name" : "#035",
- "drilldown" : "035"
- },
- {
- "drilldown" : "036",
- "y" : 66,
- "name" : "#036"
- },
- {
- "name" : "#037",
- "y" : 63,
- "drilldown" : "037"
- },
- {
- "drilldown" : "038",
- "y" : 65,
- "name" : "#038"
- },
- {
- "drilldown" : "039",
- "name" : "#039",
- "y" : 60
- },
- {
- "y" : 71,
- "name" : "#040",
- "drilldown" : "040"
- },
- {
- "name" : "#041",
- "y" : 74,
- "drilldown" : "041"
- },
- {
- "y" : 88,
- "name" : "#042",
- "drilldown" : "042"
- },
- {
- "name" : "#043",
- "y" : 65,
- "drilldown" : "043"
- },
- {
- "drilldown" : "044",
- "y" : 81,
- "name" : "#044"
- },
- {
- "drilldown" : "045",
- "name" : "#045",
- "y" : 94
- },
- {
- "name" : "#046",
- "y" : 83,
- "drilldown" : "046"
- },
- {
- "drilldown" : "047",
- "name" : "#047",
- "y" : 81
- },
- {
- "drilldown" : "048",
- "name" : "#048",
- "y" : 106
- },
- {
- "y" : 85,
- "name" : "#049",
- "drilldown" : "049"
- },
- {
- "drilldown" : "050",
- "name" : "#050",
- "y" : 96
- },
- {
- "y" : 87,
- "name" : "#051",
- "drilldown" : "051"
- },
- {
- "y" : 88,
- "name" : "#052",
- "drilldown" : "052"
- },
- {
- "y" : 98,
- "name" : "#053",
- "drilldown" : "053"
- },
- {
- "name" : "#054",
- "y" : 95,
- "drilldown" : "054"
- },
- {
- "drilldown" : "055",
- "y" : 36,
- "name" : "#055"
- }
- ],
- "colorByPoint" : "true"
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
}
- ],
+ },
"drilldown" : {
"series" : [
{
- "name" : "001",
"id" : "001",
+ "name" : "001",
"data" : [
[
"Perl",
@@ -306,7 +48,6 @@
]
},
{
- "id" : "002",
"data" : [
[
"Perl",
@@ -321,7 +62,8 @@
10
]
],
- "name" : "002"
+ "name" : "002",
+ "id" : "002"
},
{
"data" : [
@@ -338,10 +80,11 @@
9
]
],
- "id" : "003",
- "name" : "003"
+ "name" : "003",
+ "id" : "003"
},
{
+ "id" : "004",
"name" : "004",
"data" : [
[
@@ -356,11 +99,10 @@
"Blog",
10
]
- ],
- "id" : "004"
+ ]
},
{
- "name" : "005",
+ "id" : "005",
"data" : [
[
"Perl",
@@ -375,10 +117,9 @@
12
]
],
- "id" : "005"
+ "name" : "005"
},
{
- "name" : "006",
"data" : [
[
"Perl",
@@ -393,10 +134,10 @@
7
]
],
+ "name" : "006",
"id" : "006"
},
{
- "id" : "007",
"data" : [
[
"Perl",
@@ -411,10 +152,12 @@
10
]
],
- "name" : "007"
+ "name" : "007",
+ "id" : "007"
},
{
"id" : "008",
+ "name" : "008",
"data" : [
[
"Perl",
@@ -428,8 +171,7 @@
"Blog",
12
]
- ],
- "name" : "008"
+ ]
},
{
"name" : "009",
@@ -450,6 +192,7 @@
"id" : "009"
},
{
+ "id" : "010",
"data" : [
[
"Perl",
@@ -464,10 +207,10 @@
11
]
],
- "id" : "010",
"name" : "010"
},
{
+ "id" : "011",
"name" : "011",
"data" : [
[
@@ -482,11 +225,10 @@
"Blog",
10
]
- ],
- "id" : "011"
+ ]
},
{
- "name" : "012",
+ "id" : "012",
"data" : [
[
"Perl",
@@ -501,11 +243,10 @@
11
]
],
- "id" : "012"
+ "name" : "012"
},
{
"name" : "013",
- "id" : "013",
"data" : [
[
"Perl",
@@ -519,10 +260,12 @@
"Blog",
13
]
- ]
+ ],
+ "id" : "013"
},
{
"id" : "014",
+ "name" : "014",
"data" : [
[
"Perl",
@@ -536,8 +279,7 @@
"Blog",
15
]
- ],
- "name" : "014"
+ ]
},
{
"name" : "015",
@@ -558,8 +300,6 @@
"id" : "015"
},
{
- "name" : "016",
- "id" : "016",
"data" : [
[
"Perl",
@@ -573,10 +313,13 @@
"Blog",
12
]
- ]
+ ],
+ "name" : "016",
+ "id" : "016"
},
{
"id" : "017",
+ "name" : "017",
"data" : [
[
"Perl",
@@ -590,12 +333,11 @@
"Blog",
12
]
- ],
- "name" : "017"
+ ]
},
{
- "name" : "018",
"id" : "018",
+ "name" : "018",
"data" : [
[
"Perl",
@@ -613,7 +355,6 @@
},
{
"name" : "019",
- "id" : "019",
"data" : [
[
"Perl",
@@ -627,7 +368,8 @@
"Blog",
13
]
- ]
+ ],
+ "id" : "019"
},
{
"name" : "020",
@@ -648,8 +390,6 @@
"id" : "020"
},
{
- "name" : "021",
- "id" : "021",
"data" : [
[
"Perl",
@@ -663,7 +403,9 @@
"Blog",
10
]
- ]
+ ],
+ "name" : "021",
+ "id" : "021"
},
{
"data" : [
@@ -680,11 +422,10 @@
10
]
],
- "id" : "022",
- "name" : "022"
+ "name" : "022",
+ "id" : "022"
},
{
- "name" : "023",
"data" : [
[
"Perl",
@@ -699,11 +440,11 @@
12
]
],
+ "name" : "023",
"id" : "023"
},
{
"name" : "024",
- "id" : "024",
"data" : [
[
"Perl",
@@ -717,7 +458,8 @@
"Blog",
11
]
- ]
+ ],
+ "id" : "024"
},
{
"name" : "025",
@@ -738,7 +480,6 @@
"id" : "025"
},
{
- "name" : "026",
"id" : "026",
"data" : [
[
@@ -753,9 +494,12 @@
"Blog",
10
]
- ]
+ ],
+ "name" : "026"
},
{
+ "id" : "027",
+ "name" : "027",
"data" : [
[
"Perl",
@@ -769,12 +513,9 @@
"Blog",
9
]
- ],
- "id" : "027",
- "name" : "027"
+ ]
},
{
- "id" : "028",
"data" : [
[
"Perl",
@@ -789,11 +530,11 @@