diff options
| author | Fourand <4randrofficial@gmail.com> | 2019-10-18 17:17:44 +0500 |
|---|---|---|
| committer | Fourand <4randrofficial@gmail.com> | 2019-10-18 17:17:44 +0500 |
| commit | 6e51b5dfe47733aaa7697b60b9a4470b5045de0d (patch) | |
| tree | 940124622643ab57e1b8a0aaef9104a088d5863a | |
| parent | fab3812047243871a82f3cb070ec9d8fe447ddd0 (diff) | |
| download | perlweeklychallenge-club-6e51b5dfe47733aaa7697b60b9a4470b5045de0d.tar.gz perlweeklychallenge-club-6e51b5dfe47733aaa7697b60b9a4470b5045de0d.tar.bz2 perlweeklychallenge-club-6e51b5dfe47733aaa7697b60b9a4470b5045de0d.zip | |
update
| -rw-r--r-- | challenge-030/vyacheslav-volgarev/perl5/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-030/vyacheslav-volgarev/perl5/ch-2.pl b/challenge-030/vyacheslav-volgarev/perl5/ch-2.pl index 9d3ecc3971..5fc17c7efa 100644 --- a/challenge-030/vyacheslav-volgarev/perl5/ch-2.pl +++ b/challenge-030/vyacheslav-volgarev/perl5/ch-2.pl @@ -14,6 +14,6 @@ for my $first ( 1..10 ) { push @numbers, join ", ", sort { $a <=> $b } ( $first, $second, $third ) if $third > 0; } } -my %uniq; + $, = ";\n"; say uniqstr @numbers; |