> this is actual part of my code.. all work but it seems that something is > wrong in foreach part.. in reality script calculate $dodatne_opcije only! > $vrsta_paketa is not added in calculation.. > > my $vrsta_paketa = { > '20MB' => 205, > '50MB' => 270, > '100MB' => 350, > '200MB' => 450, > '500MB' => 550, > '1000MB' => 750 > }; > > my $dodatne_opcije = { > 'Subdomene' => 73, > 'ASP' => 70, > 'SSL' => 440, > 'Java' => 40 > }; > > foreach(keys %{$dodatne_opcije}){ > if($forma->{$_} eq $_){ > $cena += $dodatne_opcije->{$_}; > } > } > > my $pdv = 0.22 * $cena; > > my $ukupno = $pdv + $cena;
I don't speak ... Croatian? But it sounds like you want to loop over both hashes...? You can do that for $vrsta_paketa the same way you already do it for $dodatne_opcije. Cheers, Dave -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>