#!/usr/bin/perl package Mymodule; use strict; use warnings; require Exporter; our @ISA=qw(Exporter); our @EXPORT_OK = qw( values ); sub values { my $val1 = $_[0]; my $val2 = $_[1]; return ($val1, $val2); } 1;