diff options
| -rw-r--r-- | challenge-060/mohammad-anwar/perl/ch-1a.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-060/mohammad-anwar/perl/ch-1a.pl b/challenge-060/mohammad-anwar/perl/ch-1a.pl index 5ebc0b1ed4..e49028b29b 100644 --- a/challenge-060/mohammad-anwar/perl/ch-1a.pl +++ b/challenge-060/mohammad-anwar/perl/ch-1a.pl @@ -5,9 +5,9 @@ use warnings; use Test::More; -is (excel_column(26), "Z", "Z => 26"); -is (excel_column(28), "AB", "28 => AB"); +is (excel_column("Z"), 26, "Z => 26"); is (excel_column("AB"), 28, "AB => 28"); +is (excel_column(28), "AB", "28 => AB"); done_testing; |