使用Perl模块

Question

我正在尝试为我的示波器创建一个函数库,但我似乎无法让其他模块文件发挥得很好.

我有什么在这里,除了Oscope.pm文件.如果需要,我也可以上传.

test.pl

# Includes
use 5.012;
use Oscope;
use Oscope::Acquire;
use warnings;

# From Oscope.pm
my $scope = Oscope->new('port', 'COM3');

# From Oscope::Acquire.pm
$scope->QueryAcquire();

oscope需要/ Acquire.pm

package Oscope::Acquire;

use Oscope;
use parent 'Oscope';

sub QueryAcquire
{
   my ($self) = @_;
   # Oscope.pm
   my $message = $self->Send('ACQUIRE?');
   return();
}

1;

产量

无法通过C:\ Documents and Settings\ericfoss\My Documents\Slick\Perl\tests\Test.pl第11行中的包"Oscope"找到对象方法"QueryAcquire".

Answer 1

Oscope->new('port', 'COM3')

应该

Oscope::Acquire->new('port', 'COM3')