Exporter query

[jeevs]

#!c:/perl/bin/perl.exe
#Calculator.pm

package calc;

use strict;
use warnings;
use Exporter;

our @ISA = qw(Exporter);
our @EXPORT = qw(add);

sub add
{
        my ($num1,$num2) = @_;
    $num1+$num2;
}

1;

>>>>>>>>>>>>>>>>>>>

#!c:/perl/bin/perl.exe
#adcalculator.pl

use strict;
use warnings;
use Calculator;

my $addn = add(1,9);
print $addn;

>>>>>>>>>>>>>>

it says
undefined subroutine &main::add called at adcalculator,pl line 8.


Where am I going wrong???


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/