diff options
| -rwxr-xr-x | challenge-019/gustavo-chaves/perl5/ch-2.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-019/gustavo-chaves/perl5/ch-2.pl b/challenge-019/gustavo-chaves/perl5/ch-2.pl index f4df867955..90a6847d9f 100755 --- a/challenge-019/gustavo-chaves/perl5/ch-2.pl +++ b/challenge-019/gustavo-chaves/perl5/ch-2.pl @@ -28,5 +28,6 @@ while (<>) { $line = $word; } } - say "$line\n" if length($line); + say $line if length($line); + say "\n"; } |