Select Code to Download

package Quote;
use strict;
...
}

1;

package QuotePlus;
use Quote;
...
}

1;

#! perl -slw
use strict;
...
26821.2    Kahless    Klingons forever!
26822.1    Kahless    We are KLINGONS!
26888.2    Kahless    Qapla`!

C:\test>quote
 Kahless said: 'It's a good day to die!'; circa. 25530
...
 Kahless said: 'Qapla`!'; circa. 26888

C:\test>