setup challenge-077

2 files changed, 26 insertions, 0 deletions

diff --git a/challenge-077/alexander-pankoff/perl/ch-1.pl b/challenge-077/alexander-pankoff/perl/ch-1.pl
new file mode 100644
index 0000000000..cd58b887a5
--- /dev/null
+++ b/challenge-077/alexander-pankoff/perl/ch-1.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/env perl
+use v5.20;
+use utf8;
+use strict;
+use warnings;
+use autodie;
+use feature qw(say signatures);
+no warnings 'experimental::signatures';
+
+# You are given a positive integer $N.
+#
+# Write a script to find out all possible combination of Fibonacci Numbers required to get $N on addition.
+#
+# You are NOT allowed to repeat a number. Print 0 if none found.
diff --git a/challenge-077/alexander-pankoff/perl/ch-2.pl b/challenge-077/alexander-pankoff/perl/ch-2.pl
new file mode 100644
index 0000000000..9071e2760e
--- /dev/null
+++ b/challenge-077/alexander-pankoff/perl/ch-2.pl
@@ -0,0 +1,12 @@
+#!/usr/bin/env perl
+use v5.20;
+use utf8;
+use strict;
+use warnings;
+use autodie;
+use feature qw(say signatures);
+no warnings 'experimental::signatures';
+
+# You are given m x n character matrix consists of O and X only.
+#
+# Write a script to count the total number of X surrounded by O only. Print 0 if none found.