> 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>
