passing array-ref from sub to sub

[Stefan.Haberer]

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);
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;

    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]