1

私はPerlの初心者です。CPAN インターフェイス モジュールを使用しようとしていますが、動作させることができません。このページの指示に従ってモジュールをインストールしました 。私はEPIC-Eclipseを使用しています。同じウェブサイトにある例を実装しようとしています。例は次のとおりです。これは Bouncable インターフェイスです。

  package Bouncable;

  use Class::Interface;
  &interface;   # this actually declares the interface

  sub bounce;
  sub getBounceBack;

  1;

これは Bouncable インターフェースを実装する Ball クラスです。

  package Ball;

  use Class::Interface;
  &implements( 'Bouncable' );

  sub bounce {
    my $self = shift;
    print "The ball is bouncing @ ".$self->getBounceBack." strength"
  }

  sub getBounceBack {
    return 10;
  }

  1;

コードはかなり単純明快です。しかし、私は次のエラーで立ち往生しており、それを取り除くことはできません.

Ball tries to implement non existing interface Bouncable -- Interface Bouncable does not use the interface module. at D:/Eclipse projects/PerlTrial/Bouncable.pm line 4.
Compilation failed in require at (eval 3) line 1.
BEGIN failed--compilation aborted at (eval 3) line 1.
 at D:/Eclipse projects/PerlTrial/Ball.pm line 4.

どんな助けでも大歓迎です！ありがとう

4

2 に答える 2