[EMAIL PROTECTED] wrote: > Hi there, > > I would like to transfer an array-reference from sub "get_link_attr_entry_list" > to sub "get_link_priority", but it doesn't work. > Here is the code: > > use strict; > > my $link_id = ''; > my $link_attr_entry_list_ref = ''; > .... > > get_link_attr_entry_list($link_id);
You will have to take the return value from get_link_attr_entry_list in $link_attr_entry_list_ref or change the following line to get_link_priority (get_link_attr_entry_list ($link_id)); > > get_link_priority($link_attr_entry_list_ref); > .... > > ############################################################## > sub get_link_attr_entry_list { > > my $link_id = $_[0]; > > @link_attr_entry_list = $linkattrdb->find_using_linkid($link_id); > my $link_attr_entry_list_ref = \@link_attr_entry_list; The variable declared here is lexically scoped inside this subroutine. The return value is also not being used. The reference that you have created will be lost after the execution of this subroutine. > > > > return $link_attr_entry_list_ref; > > } > > sub get_link_priority { > > my $link_attr_entry_list_ref = $_[0]; > my @link_attr_entry_list = @$link_attr_entry_list_ref; > > foreach my $link_attr_entry (@link_attr_entry_list) { > ... > } > > thanks in advance for your help! > > greetings > > Stefan > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]