diff options
| -rw-r--r-- | challenge-077/alexander-pankoff/perl/ch-1.pl | 14 | ||||
| -rw-r--r-- | challenge-077/alexander-pankoff/perl/ch-2.pl | 12 |
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. |