modified: challenge-140/mattneleigh/perl/ch-1.pl

1 files changed, 1 insertions, 1 deletions

diff --git a/challenge-140/mattneleigh/perl/ch-1.pl b/challenge-140/mattneleigh/perl/ch-1.pl
index d6aac51cff..e8baa8914e 100755
--- a/challenge-140/mattneleigh/perl/ch-1.pl
+++ b/challenge-140/mattneleigh/perl/ch-1.pl
@@ -149,7 +149,7 @@ sub add{
     # Extract the individual digits and store
     # them in reverse order (least
     # significant bit first)
-    my @self_digits = reverse(split("", $self->{value}));
+    my @self_digits = reverse(split("", $self->getValue()));
     my @addend_digits = reverse(split("", $addend->getValue()));
     my $max;
     my $i;