Re: Basic Array Question

Instead of doing @row =, I'd use explicitly named variables. Then the following will probably be easier to follow...

my %page_hits;
while (my ($page_title, $hit_count) = $cursor->fetchrow_array) {
    $page_hits{$page_title} = $hit_count;  
}
[download]

Cheers,
Darren :)

Comment on Re: Basic Array Question Select or Download Code

Replies are listed 'Best First'.
Re^2: Basic Array Question by pickledegg (Novice) on May 10, 2006 at 16:20 UTC
Thanks Jeff & Darren, I understand this part, that sets the 2 variables to the 2 fields: `while (my ($page_title, $hit_count) = $cursor->fetchrow_array) {` [download] I assume the next line is setting the page_hits hash, with the index being $page_title and the value being $hit_count, right? Next dumb question, what is the '%' in front of the page_hits?, and why use 'my'? Sorry for the ignorance , this is certainly not PHP :)	[reply] [d/l]
Re^3: Basic Array Question by saberworks (Curate) on May 10, 2006 at 17:53 UTC
The % tells perl that it is a hash (not a regular array, @, or a scalar, $). In perl, %var is different than $var is different than @var. So you can have all three if you want. "my" declares a lexical scope. You should really read up on "use strict" "use warnings" and scoping. There are tons of articles on the web and on this site. In regards to this specific use of "my" - it makes the two variables visible to only the inside of said while loop. If you have on "strict" and "warnings" and you try to print $page_title AFTER the end of the while loop, you will get an error, because the variable has gone out of scope. It's not like PHP where you can make a variable inside a huge nested loop/function and have it visible outside of said loop or function.	[reply]