#!/usr/bin/perl use strict; require "func.pl"; my $one = 1; my $two = 2; my $answer = ( $one + $two); adding($one,$two);