--------------
Bob Erinkveld (Webmaster Insane Hosts)
www.insane-hosts.net
MSN: [EMAIL PROTECTED]
From: Mark Goland <[EMAIL PROTECTED]>
To: perl <[EMAIL PROTECTED]>
Subject: linked list's
Date: Sun, 08 Dec 2002 04:18:58 -0500
hi all,
I am having problems printing this doubly list. the bug statment prints the
expacted so I think I have the list setup right, but I cant get this list to
print in reverse... any ideas ??
Thanx in Advance
#!/usr/bin/perl -w
$debug=1;
for($i=1;$i<10;$i++){
$list = {value=>$i,prev=>$list,next=>${prev} };
print "prev=$prev\tlist=$list\n" if( $debug);
$prev= $list;
}
$iterator = $list;
while($iterator){
print "$iterator->{value} ";
$iterator = $iterator->{next};
#$iterator=$iterator->{prev};
}
print "\n";
print "In reverse \n";
$iterator = $prev;
while($iterator){
print "$iterator->{value} ";
$iterator= $iterator->{prev};
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
_________________________________________________________________ Chatten met je online vrienden via MSN Messenger. http://messenger.msn.nl/
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]