http://www.perlmonks.org?node_id=1052224


in reply to Linked List

Hi code-ninja!

When you pass through the list you check if the current element is the one you want to remove: 

if($temp->[VAL] == $ele) {

[download]
and if it isn't, you move to the next element: 
$temp = $temp->[NEXT];

[download]
However the pred-Element still stays the first one ... so when you remove the 16, you would link the 25 directly after the 1. You will need to adjust pred also.

note: your code also needs some adjustment if you want the possibility to delete the first element.

HTH, Rata

Replies are listed 'Best First'.
Re^2: Linked List
by code-ninja (Scribe) on Sep 04, 2013 at 06:57 UTC
    perfect. That was a stupid mistake. :/ 
    ...

} else {
    $temp = $temp->[NEXT];
    $pred = $pred->[NEXT]; # this is what you are saying.
}

...

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom