X-Git-Url: http://git.rot13.org/?p=koha-hnb-currency-import.git;a=blobdiff_plain;f=hnb.pl;h=00d68f4ea85e4668e44accdbfa17a6299bdacb2a;hp=3664d511c68b755613f216cab1f4dbde04647eb1;hb=06217f25d24e3fd6c1e711bb0b7fd58527d32264;hpb=81407eba213bbfb209afe61634e7a66bd9028a4c

diff --git a/hnb.pl b/hnb.pl
index 3664d51..00d68f4 100644
--- a/hnb.pl
+++ b/hnb.pl
@@ -20,9 +20,11 @@ while(<>) {
 	my ( $sifra, $oznaka, $broj, $kupovni, $srednji, $prodajni ) = unpack 'A3A3A3A15A15A15', $_;
 	warn "$sifra|$oznaka|$broj|$kupovni|$srednji|$prodajni|\n";
 
+	my $tecaj = $srednji / $broj;
+
 	print qq{
-		INSERT INTO currency SET currency='$oznaka',symbol='$oznaka',rate=$srednji,active=0
-		ON DUPLICATE KEY UPDATE rate=$srednji ;
+		INSERT INTO currency SET currency='$oznaka',symbol='$oznaka',rate=$tecaj,active=0
+		ON DUPLICATE KEY UPDATE rate=$tecaj ;
 	};
 
 }