#!/usr/bin/perl -w

######################################################################################
#
#
#
######################################################################################


use strict;

#  lokalni moduli


use lib "/home/base/kontrola";   #klicem knjiznico lastnih procedur

#use KontrolaModuli::Kontrola;
use KontrolaModuli::p1; #klicem paketa za sestevanje in odstevanje iz p1.pm 






###########################
# definicije spremenljivk #
###########################

# definicija  spremenljivk

my ($a, $b, $c,$d);


#---------------------------------------------#

# sestej in odstej poprograma sta v p1.pm paketu v
# /home/base/kontrola/KontrolaModuli


print "Vstavi vrednost a "; $a=<STDIN>; chomp($a); 
print "\n Vstavi vrednost b "; $b=<STDIN>; chomp($b); 
#$c=sestej($a);   #deluje
$c= sestej($a,$b);
$d= odstej($a,$b);

print "\n rezultat a+b = $c \n";
print "\n odstej   a-b = $d \n";