diff options
| author | drbaggy <js5@sanger.ac.uk> | 2021-02-17 05:29:39 +0000 |
|---|---|---|
| committer | drbaggy <js5@sanger.ac.uk> | 2021-02-17 05:29:39 +0000 |
| commit | 8509fb60ef93feaa4ea9315343e4786418a819b1 (patch) | |
| tree | 83bb335a012383d3d5ac77e2a48aa84c1d75ea3b | |
| parent | ec4afdead799902c4e58393164f060b2187f2f21 (diff) | |
| download | perlweeklychallenge-club-8509fb60ef93feaa4ea9315343e4786418a819b1.tar.gz perlweeklychallenge-club-8509fb60ef93feaa4ea9315343e4786418a819b1.tar.bz2 perlweeklychallenge-club-8509fb60ef93feaa4ea9315343e4786418a819b1.zip | |
include path in output as well as triangle as well as total
| -rw-r--r-- | challenge-100/james-smith/perl/ch-2.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/challenge-100/james-smith/perl/ch-2.pl b/challenge-100/james-smith/perl/ch-2.pl index 9070cbf3e9..6930813f37 100644 --- a/challenge-100/james-smith/perl/ch-2.pl +++ b/challenge-100/james-smith/perl/ch-2.pl @@ -87,5 +87,6 @@ sub display_sum { } 0..$a ), "\n" } 0..@_-1 ), - "\nMinimum path: ",(join ' -> ', map { $_[$_][$route[$_]] } 0..@_-1 ),' ; Total: ',$b->[0],"\n\n"; + "\nMinimum path: ",(join ' -> ', map { + $_[$_][$route[$_]] } 0..@_-1 ),' ; Total: ',$b->[0],"\n\n"; } |