diff options
| author | Niels van Dijke <perlboy@cpan.org> | 2023-05-15 21:42:10 +0000 |
|---|---|---|
| committer | Niels van Dijke <perlboy@cpan.org> | 2023-05-15 21:42:10 +0000 |
| commit | 2b5536c527eff3efef9f1e0815dac18b32ad517f (patch) | |
| tree | 2c7102d118d8e88bdbf322753e20f24fc13710e5 | |
| parent | efa8851cd735e3d7ae896eef20171db3a9f087df (diff) | |
| download | perlweeklychallenge-club-2b5536c527eff3efef9f1e0815dac18b32ad517f.tar.gz perlweeklychallenge-club-2b5536c527eff3efef9f1e0815dac18b32ad517f.tar.bz2 perlweeklychallenge-club-2b5536c527eff3efef9f1e0815dac18b32ad517f.zip | |
Task 2 - Use string concat instead of double quotes
| -rwxr-xr-x | challenge-217/perlboy1967/perl/ch2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-217/perlboy1967/perl/ch2.pl b/challenge-217/perlboy1967/perl/ch2.pl index 9bda146726..60d238fdf7 100755 --- a/challenge-217/perlboy1967/perl/ch2.pl +++ b/challenge-217/perlboy1967/perl/ch2.pl @@ -23,7 +23,7 @@ use common::sense; use Test::More; sub maxNumber (@) { - join('',sort{"$b$a"<=>"$a$b"}@_); + join('',sort{$b.$a<=>$a.$b}@_); } is(maxNumber(1,23),231); |