sub create_output (\@$)  {
    
    my ($arrayref_of_lines, $entry_no_new) = @_;    
    
    my @array_of_lines = @$arrayref_of_lines;

    print "Hi there\n";
    print "@array_of_lines";  # THIS IS NOT PRINTING ANYTHING
    exit;



##</code><code>##


Use of uninitialized value $_[1] in join or string at receive_annotations_B.pl line 162.


##</code><code>##


sub create_output (\@$)  {
    
    my ($arrayref_of_lines, $entry_no_new) = @_;    # THIS DOES NOT WORK
    
    my @array_of_lines = @$arrayref_of_lines;
    

    print "Hi there\n";
    print "@_";
    print "@array_of_lines";
    exit;