diff options
| -rw-r--r-- | challenge-068/mohammad-anwar/perl/ch-2.pl | 1 | ||||
| -rw-r--r-- | challenge-068/mohammad-anwar/perl/ch-2a.pl | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/challenge-068/mohammad-anwar/perl/ch-2.pl b/challenge-068/mohammad-anwar/perl/ch-2.pl index 8b5868a119..a49ca3bf8d 100644 --- a/challenge-068/mohammad-anwar/perl/ch-2.pl +++ b/challenge-068/mohammad-anwar/perl/ch-2.pl @@ -18,7 +18,6 @@ has c => (is => 'rw'); sub show_link { my ($self) = @_; - my $head = $self; my @v = (); while ($head->c) { diff --git a/challenge-068/mohammad-anwar/perl/ch-2a.pl b/challenge-068/mohammad-anwar/perl/ch-2a.pl index b8f5069519..3620a16d5e 100644 --- a/challenge-068/mohammad-anwar/perl/ch-2a.pl +++ b/challenge-068/mohammad-anwar/perl/ch-2a.pl @@ -18,7 +18,6 @@ has c => (is => 'rw'); sub show_link { my ($self) = @_; - my $head = $self; my @v = (); while ($head->c) { |