aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--challenge-110/mohammad-anwar/perl/ch-1.pl34
-rw-r--r--challenge-110/mohammad-anwar/perl/ch-2.pl29
-rw-r--r--challenge-110/mohammad-anwar/perl/input-1.txt5
-rw-r--r--challenge-110/mohammad-anwar/perl/input-2.txt5
-rw-r--r--stats/pwc-current.json141
-rw-r--r--stats/pwc-language-breakdown-summary.json58
-rw-r--r--stats/pwc-language-breakdown.json1542
-rw-r--r--stats/pwc-leaders.json730
-rw-r--r--stats/pwc-summary-1-30.json110
-rw-r--r--stats/pwc-summary-121-150.json98
-rw-r--r--stats/pwc-summary-151-180.json36
-rw-r--r--stats/pwc-summary-181-210.json48
-rw-r--r--stats/pwc-summary-211-240.json62
-rw-r--r--stats/pwc-summary-31-60.json110
-rw-r--r--stats/pwc-summary-61-90.json96
-rw-r--r--stats/pwc-summary-91-120.json100
-rw-r--r--stats/pwc-summary.json490
17 files changed, 1891 insertions, 1803 deletions
diff --git a/challenge-110/mohammad-anwar/perl/ch-1.pl b/challenge-110/mohammad-anwar/perl/ch-1.pl
new file mode 100644
index 0000000000..141fdf3b8e
--- /dev/null
+++ b/challenge-110/mohammad-anwar/perl/ch-1.pl
@@ -0,0 +1,34 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+my $FILE = $ARGV[0];
+die "ERROR: Missing input file.\n" unless defined $FILE;
+
+open(my $fh, '<:encoding(utf8)', $FILE)
+ or die "ERROR: Unable to open $FILE: $!\n";
+
+while (my $row = <$fh>) {
+ chomp $row;
+
+ #
+ # I got the following regex works fine against the test data
+ # when used on regex101.com
+ #
+ # /^\+?|(\()?\d{2}\d{2}?\1?\s\d{10}$/
+ #
+ # But For some strange reason, it didn't work here.
+ #
+ # So I had to get the following instead.
+ #
+
+ if ( ($row =~ /\+\d{2}\s\d{10}/) ||
+ ($row =~ /\d{4}\s\d{10}/) ||
+ ($row =~ /\(\d{2}\)\s\d{10}/)
+ ) {
+ print "$row\n";
+ }
+}
+
+close($fh);
diff --git a/challenge-110/mohammad-anwar/perl/ch-2.pl b/challenge-110/mohammad-anwar/perl/ch-2.pl
new file mode 100644
index 0000000000..5591c5cb18
--- /dev/null
+++ b/challenge-110/mohammad-anwar/perl/ch-2.pl
@@ -0,0 +1,29 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Text::CSV;
+
+my $FILE = $ARGV[0];
+die "ERROR: Missing input file.\n" unless defined $FILE;
+
+my $csv = Text::CSV->new;
+
+open(my $fh, '<:encoding(utf8)', $FILE)
+ or die "ERROR: Unable to open $FILE: $!\n";
+
+my $contents = [];
+while (my $row = $csv->getline($fh)) {
+ chomp $row;
+ my $i = 0;
+ foreach my $field (@$row) {
+ push @{$contents->[$i++]}, $field;
+ }
+}
+
+close($fh);
+
+foreach my $row (@$contents) {
+ print join(",", @$row), "\n";
+}
diff --git a/challenge-110/mohammad-anwar/perl/input-1.txt b/challenge-110/mohammad-anwar/perl/input-1.txt
new file mode 100644
index 0000000000..48d6254741
--- /dev/null
+++ b/challenge-110/mohammad-anwar/perl/input-1.txt
@@ -0,0 +1,5 @@
+0044 1148820341
+ +44 1148820341
+ 44-11-4882-0341
+(44) 1148820341
+ 00 1148820341
diff --git a/challenge-110/mohammad-anwar/perl/input-2.txt b/challenge-110/mohammad-anwar/perl/input-2.txt
new file mode 100644
index 0000000000..716ebdce75
--- /dev/null
+++ b/challenge-110/mohammad-anwar/perl/input-2.txt
@@ -0,0 +1,5 @@
+name,age,sex
+Mohammad,45,m
+Joe,20,m
+Julie,35,f
+Cristina,10,f
diff --git a/stats/pwc-current.json b/stats/pwc-current.json
index 26d93ceda3..91f0580276 100644
--- a/stats/pwc-current.json
+++ b/stats/pwc-current.json
@@ -1,24 +1,76 @@
{
- "yAxis" : {
- "title" : {
- "text" : "Total Solutions"
- }
+ "title" : {
+ "text" : "Perl Weekly Challenge - 110"
+ },
+ "subtitle" : {
+ "text" : "[Champions: 6] Last updated at 2021-04-26 18:22:36 GMT"
+ },
+ "xAxis" : {
+ "type" : "category"
},
"plotOptions" : {
"series" : {
"dataLabels" : {
- "format" : "{point.y}",
- "enabled" : 1
+ "enabled" : 1,
+ "format" : "{point.y}"
},
"borderWidth" : 0
}
},
- "xAxis" : {
- "type" : "category"
+ "legend" : {
+ "enabled" : 0
+ },
+ "chart" : {
+ "type" : "column"
+ },
+ "series" : [
+ {
+ "name" : "Perl Weekly Challenge - 110",
+ "colorByPoint" : 1,
+ "data" : [
+ {
+ "y" : 4,
+ "drilldown" : "Luca Ferrari",
+ "name" : "Luca Ferrari"
+ },
+ {
+ "drilldown" : "Mark Anderson",
+ "y" : 2,
+ "name" : "Mark Anderson"
+ },
+ {
+ "y" : 2,
+ "drilldown" : "Mohammad S Anwar",
+ "name" : "Mohammad S Anwar"
+ },
+ {
+ "name" : "Niels van Dijke",
+ "y" : 2,
+ "drilldown" : "Niels van Dijke"
+ },
+ {
+ "name" : "Roger Bell_West",
+ "drilldown" : "Roger Bell_West",
+ "y" : 4
+ },
+ {
+ "drilldown" : "Stuart Little",
+ "y" : 4,
+ "name" : "Stuart Little"
+ }
+ ]
+ }
+ ],
+ "yAxis" : {
+ "title" : {
+ "text" : "Total Solutions"
+ }
},
"drilldown" : {
"series" : [
{
+ "name" : "Luca Ferrari",
+ "id" : "Luca Ferrari",
"data" : [
[
"Raku",
@@ -28,33 +80,41 @@
"Blog",
2
]
- ],
- "name" : "Luca Ferrari",
- "id" : "Luca Ferrari"
+ ]
},
{
- "id" : "Mark Anderson",
- "name" : "Mark Anderson",
"data" : [
[
"Raku",
2
]
+ ],
+ "id" : "Mark Anderson",
+ "name" : "Mark Anderson"
+ },
+ {
+ "name" : "Mohammad S Anwar",
+ "id" : "Mohammad S Anwar",
+ "data" : [
+ [
+ "Perl",
+ 2
+ ]
]
},
{
- "id" : "Niels van Dijke",
"data" : [
[
"Perl",
2
]
],
+ "id" : "Niels van Dijke",
"name" : "Niels van Dijke"
},
{
- "id" : "Roger Bell_West",
"name" : "Roger Bell_West",
+ "id" : "Roger Bell_West",
"data" : [
[
"Perl",
@@ -67,8 +127,8 @@
]
},
{
- "id" : "Stuart Little",
"name" : "Stuart Little",
+ "id" : "Stuart Little",
"data" : [
[
"Perl",
@@ -82,54 +142,9 @@
}
]
},
- "title" : {
- "text" : "Perl Weekly Challenge - 110"
- },
- "legend" : {
- "enabled" : 0
- },
- "series" : [
- {
- "colorByPoint" : 1,
- "data" : [
- {
- "drilldown" : "Luca Ferrari",
- "name" : "Luca Ferrari",
- "y" : 4
- },
- {
- "drilldown" : "Mark Anderson",
- "name" : "Mark Anderson",
- "y" : 2
- },
- {
- "name" : "Niels van Dijke",
- "drilldown" : "Niels van Dijke",
- "y" : 2
- },
- {
- "drilldown" : "Roger Bell_West",
- "name" : "Roger Bell_West",
- "y" : 4
- },
- {
- "y" : 4,
- "name" : "Stuart Little",
- "drilldown" : "Stuart Little"
- }
- ],
- "name" : "Perl Weekly Challenge - 110"
- }
- ],
- "subtitle" : {
- "text" : "[Champions: 5] Last updated at 2021-04-26 16:42:51 GMT"
- },
- "chart" : {
- "type" : "column"
- },
"tooltip" : {
- "followPointer" : 1,
"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/>"
+ "pointFormat" : "<span style='color:{point.color}'>{point.name}</span>: <b>{point.y:f}</b><br/>",
+ "followPointer" : 1
}
}
diff --git a/stats/pwc-language-breakdown-summary.json b/stats/pwc-language-breakdown-summary.json
index 527ece6ea7..8106f5e8cc 100644
--- a/stats/pwc-language-breakdown-summary.json
+++ b/stats/pwc-language-breakdown-summary.json
@@ -1,21 +1,6 @@
{
- "xAxis" : {
- "type" : "category",
- "labels" : {
- "style" : {
- "fontSize" : "13px",
- "fontFamily" : "Verdana, sans-serif"
- }
- }
- },
- "title" : {
- "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
- },
- "yAxis" : {
- "min" : 0,
- "title" : {
- "text" : null
- }
+ "legend" : {
+ "enabled" : "false"
},
"chart" : {
"type" : "column"
@@ -23,22 +8,26 @@
"tooltip" : {
"pointFormat" : "<b>{point.y:.0f}</b>"
},
- "legend" : {
- "enabled" : "false"
+ "yAxis" : {
+ "title" : {
+ "text" : null
+ },
+ "min" : 0
},
"series" : [
{
+ "name" : "Contributions",
"dataLabels" : {
+ "align" : "right",
"style" : {
- "fontSize" : "13px",
- "fontFamily" : "Verdana, sans-serif"
+ "fontFamily" : "Verdana, sans-serif",
+ "fontSize" : "13px"
},
+ "format" : "{point.y:.0f}",
+ "y" : 10,
"color" : "#FFFFFF",
"rotation" : -90,
- "format" : "{point.y:.0f}",
- "enabled" : "true",
- "align" : "right",
- "y" : 10
+ "enabled" : "true"
},
"data" : [
[
@@ -47,17 +36,28 @@
],
[
"Perl",
- 5164
+ 5166
],
[
"Raku",
3288
]
- ],
- "name" : "Contributions"
+ ]
}
],
+ "title" : {
+ "text" : "Perl Weekly Challenge Contributions [2019 - 2020]"
+ },
"subtitle" : {
- "text" : "Last updated at 2021-04-26 16:42:51 GMT"
+ "text" : "Last updated at 2021-04-26 18:22:36 GMT"
+ },
+ "xAxis" : {
+ "type" : "category",
+ "labels" : {
+ "style" : {
+ "fontSize" : "13px",
+ "fontFamily" : "Verdana, sans-serif"
+ }
+ }
}
}
diff --git a/stats/pwc-language-breakdown.json b/stats/pwc-language-breakdown.json
index 45672d2d63..c63a1600c2 100644
--- a/stats/pwc-language-breakdown.json
+++ b/stats/pwc-language-breakdown.json
@@ -1,579 +1,4 @@
{
- "chart" : {
- "type" : "column"
- },
- "tooltip" : {
- "pointFormat" : "<span style=\"color:{point.color}\">Challenge {point.name}</span>: <b>{point.y:f}</b><br/>",
- "headerFormat" : "<span style=\"font-size:11px\"></span>",
- "followPointer" : "true"
- },
- "series" : [
- {
- "colorByPoint" : "true",
- "data" : [
- {
- "name" : "#001",
- "drilldown" : "001",
- "y" : 161
- },
- {
- "name" : "#002",
- "drilldown" : "002",
- "y" : 125
- },
- {
- "name" : "#003",
- "drilldown" : "003",
- "y" : 81
- },
- {
- "y" : 99,
- "name" : "#004",
- "drilldown" : "004"
- },
- {
- "y" : 78,
- "name" : "#005",
- "drilldown" : "005"
- },
- {
- "name" : "#006",
- "drilldown" : "006",
- "y" : 58
- },
- {
- "name" : "#007",
- "drilldown" : "007",
- "y" : 64
- },
- {
- "name" : "#008",
- "drilldown" : "008",
- "y" : 78
- },
- {
- "drilldown" : "009",
- "name" : "#009",
- "y" : 76
- },
- {
- "drilldown" : "010",
- "name" : "#010",
- "y" : 65
- },
- {
- "drilldown" : "011",
- "name" : "#011",
- "y" : 85
- },
- {
- "y" : 89,
- "name" : "#012",
- "drilldown" : "012"
- },
- {
- "y" : 82,
- "drilldown" : "013",
- "name" : "#013"
- },
- {
- "name" : "#014",
- "drilldown" : "014",
- "y" : 100
- },
- {
- "drilldown" : "015",
- "name" : "#015",
- "y" : 97
- },
- {
- "name" : "#016",
- "drilldown" : "016",
- "y" : 70
- },
- {
- "drilldown" : "017",
- "name" : "#017",
- "y" : 83
- },
- {
- "drilldown" : "018",
- "name" : "#018",
- "y" : 80
- },
- {
- "y" : 101,
- "drilldown" : "019",
- "name" : "#019"
- },
- {
- "drilldown" : "020",
- "name" : "#020",
- "y" : 99
- },
- {
- "y" : 71,
- "drilldown" : "021",
- "name" : "#021"
- },
- {
- "name" : "#022",
- "drilldown" : "022",
- "y" : 67
- },
- {
- "y" : 95,
- "drilldown" : "023",
- "name" : "#023"
- },
- {
- "drilldown" : "024",
- "name" : "#024",
- "y" : 74
- },
- {
- "y" : 59,
- "name" : "#025",
- "drilldown" : "025"
- },
- {
- "y" : 74,
- "name" : "#026",
- "drilldown" : "026"
- },
- {
- "name" : "#027",
- "drilldown" : "027",
- "y" : 60
- },
- {
- "y" : 80,
- "drilldown" : "028",
- "name" : "#028"
- },
- {
- "y" : 79,
- "name" : "#029",
- "drilldown" : "029"
- },
- {
- "drilldown" : "030",
- "name" : "#030",
- "y" : 117
- },
- {
- "drilldown" : "031",
- "name" : "#031",
- "y" : 89
- },
- {
- "drilldown" : "032",
- "name" : "#032",
- "y" : 94
- },
- {
- "y" : 110,
- "drilldown" : "033",
- "name" : "#033"
- },
- {
- "y" : 64,
- "name" : "#034",
- "drilldown" : "034"
- },
- {
- "drilldown" : "035",
- "name" : "#035",
- "y" : 64
- },
- {
- "y" : 68,
- "drilldown" : "036",
- "name" : "#036"
- },
- {
- "y" : 67,
- "drilldown" : "037",
- "name" : "#037"
- },
- {
- "y" : 67,
- "name" : "#038",
- "drilldown" : "038"
- },
- {
- "drilldown" : "039",
- "name" : "#039",
- "y" : 62
- },
- {
- "drilldown" : "040",
- "name" : "#040",
- "y" : 73
- },
- {
- "y" : 76,
- "name" : "#041",
- "drilldown" : "041"
- },
- {
- "drilldown" : "042",
- "name" : "#042",
- "y" : 92
- },
- {
- "y" : 68,
- "name" : "#043",
- "drilldown" : "043"
- },
- {
- "drilldown" : "044",
- "name" : "#044",
- "y" : 85
- },
- {
- "drilldown" : "045",
- "name" : "#045",
- "y" : 96
- },
- {
- "y" : 87,
- "drilldown" : "046",
- "name" : "#046"
- },
- {
- "y" : 84,
- "name" : "#047",
- "drilldown" : "047"
- },
- {
- "name" : "#048",
- "drilldown" : "048",
- "y" : 108
- },
- {
- "y" : 89,
- "name" : "#049",
- "drilldown" : "049"
- },
- {
- "y" : 98,
- "name" : "#050",
- "drilldown" : "050"
- },
- {
- "name" : "#051",
- "drilldown" : "051",
- "y" : 89
- },
- {
- "y" : 91,
- "drilldown" : "052",
- "name" : "#052"
- },
- {
- "y" : 101,
- "name" : "#053",
- "drilldown" : "053"
- },
- {
- "name" : "#054",
- "drilldown" : "054",
- "y" : 103
- },
- {
- "y" : 88,
- "drilldown" : "055",
- "name" : "#055"
- },
- {
- "drilldown" : "056",
- "name" : "#056",
- "y" : 95
- },
- {
- "y" : 80,
- "drilldown" : "057",
- "name" : "#057"
- },
- {
- "name" : "#058",
- "drilldown" : "058",
- "y" : 69
- },
- {
- "name" : "#059",
- "drilldown" : "059",
- "y" : 89
- },
- {
- "y" : 85,
- "drilldown" : "060",
- "name" : "#060"
- },
- {
- "y" : 81,
- "name" : "#061",
- "drilldown" : "061"
- },
- {
- "y" : 56,
- "drilldown" : "062",
- "name" : "#062"
- },
- {
- "name" : "#063",
- "drilldown" : "063",
- "y" : 89
- },
- {
- "y" : 80,
- "name" : "#064",
- "drilldown" : "064"
- },
- {
- "drilldown" : "065",
- "name" : "#065",
- "y" : 73
- },
- {
- "name" : "#066",
- "drilldown" : "066",
- "y" : 84
- },
- {
- "y" : 90,
- "name" : "#067",
- "drilldown" : "067"
- },
- {
- "y" : 75,
- "name" : "#068",
- "drilldown" : "068"
- },
- {
- "y" : 83,
- "drilldown" : "069",
- "name" : "#069"
- },
- {
- "y" : 93,
- "drilldown" : "070",
- "name" : "#070"
- },
- {
- "y" : 78,
- "drilldown" : "071",
- "name" : "#071"
- },
- {
- "y" : 112,
- "name" : "#072",
- "drilldown" : "072"
- },
- {
- "y" : 110,
- "drilldown" : "073",
- "name" : "#073"
- },
- {
- "name" : "#074",
- "drilldown" : "074",
- "y" : 115
- },
- {
- "drilldown" : "075",
- "name" : "#075",
- "y" : 113
- },
- {
- "y" : 99,
- "drilldown" : "076",
- "name" : "#076"
- },
- {
- "y" : 98,
- "name" : "#077",
- "drilldown" : "077"
- },
- {
- "name" : "#078",
- "drilldown" : "078",
- "y" : 127
- },
- {
- "y" : 122,
- "name" : "#079",
- "drilldown" : "079"
- },
- {
- "name" : "#080",
- "drilldown" : "080",
- "y" : 127
- },
- {
- "name" : "#081",
- "drilldown" : "081",
- "y" : 114
- },
- {
- "name" : "#082",
- "drilldown" : "082",
- "y" : 114
- },
- {
- "drilldown" : "083",
- "name" : "#083",
- "y" : 127
- },
- {
- "drilldown" : "084",
- "name" : "#084",
- "y" : 119
- },
- {
- "name" : "#085",
- "drilldown" : "085",
- "y" : 114
- },
- {
- "drilldown" : "086",
- "name" : "#086",
- "y" : 104
- },
- {
- "name" : "#087",
- "drilldown" : "087",
- "y" : 101
- },
- {
- "y" : 121,
- "drilldown" : "088",
- "name" : "#088"
- },
- {
- "y" : 113,
- "drilldown" : "089",
- "name" : "#089"
- },
- {
- "drilldown" : "090",
- "name" : "#090",
- "y" : 113
- },
- {
- "y" : 108,
- "name" : "#091",
- "drilldown" : "091"
- },
- {
- "y" : 98,
- "name" : "#092",
- "drilldown" : "092"
- },
- {
- "y" : 87,
- "name" : "#093",
- "drilldown" : "093"
- },
- {
- "name" : "#094",
- "drilldown" : "094",
- "y" : 87
- },
- {
- "drilldown" : "095",
- "name" : "#095",
- "y" : 108
- },
- {
- "y" : 108,
- "drilldown" : "096",
- "name" : "#096"
- },
- {
- "name" : "#097",
- "drilldown" : "097",
- "y" : 111
- },
- {
- "y" : 108,
- "name" : "#098",
- "drilldown" : "098"
- },
- {
- "name" : "#099",
- "drilldown" : "099",
- "y" : 97
- },
- {
- "y" : 120,
- "drilldown" : "100",
- "name" : "#100"
- },
- {
- "name" : "#101",
- "drilldown" : "101",
- "y" : 83
- },
- {
- "y" : 90,
- "name" : "#102",
- "drilldown" : "102"
- },
- {
- "y" : 79,
- "name" : "#103",
- "drilldown" : "103"
- },
- {
- "y" : 82,
- "name" : "#104",
- "drilldown" : "104"
- },
- {
- "drilldown" : "105",
- "name" : "#105",
- "y" : 73
- },
- {
- "drilldown" : "106",
- "name" : "#106",
- "y" : 97
- },
- {
- "drilldown" : "107",
- "name" : "#107",
- "y" : 88
- },
- {
- "y" : 92,
- "name" : "#108",
- "drilldown" : "108"
- },
- {
- "drilldown" : "109",
- "name" : "#109",
- "y" : 101
- },
- {
- "name" : "#110",
- "drilldown" : "110",
- "y" : 16
- }
- ],
- "name" : "Perl Weekly Challenge Languages"
- }
- ],
- "legend" : {
- "enabled" : "false"
- },
- "subtitle" : {
- "text" : "Click the columns to drilldown the language breakdown. Last updated at 2021-04-26 16:42:51 GMT"
- },
- "xAxis" : {
- "type" : "category"
- },
"drilldown" : {
"series" : [
{
@@ -591,8 +16,8 @@
11
]
],
- "name" : "001",
- "id" : "001"
+ "id" : "001",
+ "name" : "001"
},
{
"data" : [
@@ -609,11 +34,10 @@
10
]
],
- "name" : "002",
- "id" : "002"
+ "id" : "002",
+ "name" : "002"
},
{
- "id" : "003",
"name" : "003",
"data" : [
[
@@ -628,7 +52,8 @@
"Blog",
9
]
- ]
+ ],
+ "id" : "003"
},
{
"id" : "004",
@@ -650,7 +75,6 @@
},
{
"id" : "005",
- "name" : "005",
"data" : [
[
"Perl",
@@ -664,7 +88,8 @@
"Blog",
12
]
- ]
+ ],
+ "name" : "005"
},
{
"name" : "006",
@@ -685,6 +110,8 @@
"id" : "006"
},
{
+ "name" : "007",
+ "id" : "007",
"data" : [
[
"Perl",
@@ -698,11 +125,10 @@
"Blog",
10
]
- ],
- "name" : "007",
- "id" : "007"
+ ]
},
{
+ "name" : "008",
"data" : [
[
"Perl",
@@ -717,10 +143,11 @@
12
]
],
- "name" : "008",
"id" : "008"
},
{
+ "name" : "009",
+ "id" : "009",
"data" : [
[
"Perl",
@@ -734,9 +161,7 @@
"Blog",
13
]
- ],
- "name" : "009",
- "id" : "009"
+ ]
},
{
"data" : [
@@ -753,12 +178,11 @@
11
]
],
- "name" : "010",
- "id" : "010"
+ "id" : "010",
+ "name" : "010"
},
{
"id" : "011",
- "name" : "011",
"data" : [
[
"Perl",
@@ -772,9 +196,12 @@
"Blog",
10
]
- ]
+ ],
+ "name" : "011"
},
{
+ "name" : "012",
+ "id" : "012",
"data" : [
[
"Perl",
@@ -788,12 +215,11 @@
"Blog",
11
]
- ],
- "name" : "012",
- "id" : "012"
+ ]
},
{
"name"