Patrick Dupre wrote:
On Fri, 4 Sep 2009, Noah Garrett Wallach wrote:
Hi there,
I am having some trouble understanding hash of hashes here. I want
to find all the keys for %policy{'policy_statement'}
for my $line (@lines) {
for my $key ( keys %policy{'policy_statement'} ) {
Check if $keys is correct first
Hi Patrick,
I dont understand what you are suggesting here
if ($line =~
/set\sprotocols\sbgp\sgroup\s(\S+)\s(import|export).*?$key\s/) {
$policy{'policy_statement'}{$key} = 2;
$policy{'policy_statement'}{$key}{'group_name'}{$1} = 1;
$policy{'policy_statement'}{$key}{'policy_type'}{$2} = 1;
perl is returning a systax error:
syntax error at ./policy.sanitizer line 157, near "%policy{"
syntax error at ./policy.sanitizer line 160, near "} ="
syntax error at ./policy.sanitizer line 165, near "}"
Execution of ./policy.sanitizer aborted due to compilation errors.
what am I doing wrong?
Cheers,
Noah
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/