Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^2: Array name with a Variable

by godevars (Initiate)
on Apr 17, 2008 at 20:29 UTC ( #681290=note: print w/ replies, xml ) Need Help??


in reply to Re: Array name with a Variable
in thread Array name with a Variable

I tired this first and am running into an error. I am very new at Perl so may be missing how the subroutine is set up. I run my script witht he following (my actual arrays have many more words than that in my sample):

my @sets = (\@array1, \@array2, \@array3, \@array4 ); for my $h (0..$#sets) { for my $j ($h+1..$#sets) { compute_stuff($sets[$h], $sets[$j]); } } Sub union_intersection { my ($set1, $set2) = @_; my (%union, %intersect); foreach my $e (@$set1, @$set2) { $union{$e}++ && $intersect{$e}++ } my @intersect = sort keys %intersect; #print FILEOUT "@intersect\n"; print FILEOUT scalar @intersect; print FILEOUT "\n"; }
I get a syntax error on 2 lines. One on this line: my (%union, %intersect); The other near the last line (with '}'). Not sure why. In you example you did't have the semi-colon at the end and added it but that wasn't it. Also, don't I need to call the subroutine somewhere for it to work. Not sure if this an error on my part (e.g. not sure what compute_stuff should be doing). Thanks for the help-


Comment on Re^2: Array name with a Variable
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://681290]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (11)
As of 2015-07-06 15:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (77 votes), past polls