NAME

No::Telenor - Calculate telephone call prices in Norway

SYNPOSIS

use No::Telenor qw(samtale_pris);
$kr = samtale_pris($time, 3600, "LFV");

DESCRIPTION

This documentation is written in Norwegian.

Denne modulen inneholder funksjonen samtale_pris(). Denne funksjonen vil beregne prisen på en telefonsamtale gitt tidspunkt, varighet og takst som parameter. Funksjonen kjenner bare til sanntidstakstene som ble innført i 1997. Forhåpentligvis vil jeg klare å oppdater funksjonen etterhvert som Telenor finner på nye sprell.

samtale_pris($start, $varighet, $takst)

Rutinen vil beregne samtale prisen i NOK. Argumentet $start er starttidspunktet gitt som en standard perl 'time' verdi. Argumentet $varighet er samtalens varighet i sekunder. Argumentet $takst er en kort streng som forteller hvilken takst som skal brukes. Følgende takser er støttet:

L     Lokaltakst
LFV   Lokaltakst Familie&Venner
R     Rikstakst
RFV   Rikstakst Familie&Venner
L+    Lokaltakst Pluss
R+    Rikstakst Pluss
M     Telenor Mobil
M+    Telenor Mobil Pluss

AUTHOR

Gisle Aas <aas@sn.no>