NAME
No::Telenor - Calculate telephone call prices in Norway
SYNOPSIS
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 til sanntidstakstene som ble innført fra og med år 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
BUGS
Prisberegningen kan bli unøyaktig hvis samtalen foregikk i overgangen mellom vinter- og sommertid eller omvendt.
Jeg har heller ikke fått klarhet i hvilken takst som skal brukes på spesielle helligdager. Det tas ikke hensyn til slike dager nå.
AUTHOR
Gisle Aas <aas@sn.no>
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 29:
Non-ASCII character seen before =encoding in 'på'. Assuming CP1252