Help for this page

Select Code to Download


  1. or download this
    #BEGIN { warn "TEST: \$^X: \"$^X\" \$0: \"$0\" \$]: \"$]\" \@INC: \"@I
    +NC\"\n";
    #    for ( sort keys %ENV ) {
    #    warn "ENV $_=$ENV{$_}\n";
    ...
    BEGIN { plan tests => 1 };
    use B;
    ok(1);
    
  2. or download this
    PERL_DL_NONLAZY=1 /home/josh/perl5.005_3/bin/perl -Iblib/arch -Iblib/l
    +ib -I/home/josh/perl5.005_3/lib/perl5/5.00503/i586-linux -I/home/josh
    +/perl5.005_3/lib/perl5/5.00503 -e 'use Test::Harness qw(&runtests $ve
    +rbose); $verbose=0; runtests @ARGV;' t/*.t
    t/03b...............Can't load '/home/josh/perl5.005_3/lib/perl5/5.005
    +03/i586-linux/auto/B/B.so' for module B: /home/josh/perl5.005_3/lib/p
    +erl5/5.00503/i586-linux/auto/B/B.so: undefined symbol: Perl_byterun a
    +t /home/josh/perl5.005_3/lib/perl5/5.00503/i586-linux/DynaLoader.pm l
    +ine 169.
    
    ...
    t/03b.t           2   512     1    1 100.00%  1
    Failed 1/1 test scripts, 0.00% okay. 1/1 subtests failed, 0.00% okay.
    make: *** [test_dynamic] Error 2
    
  3. or download this
    use ExtUtils::MakeMaker;
    WriteMakefile(
        'NAME'        => 'B::Source',
    ...
          (ABSTRACT_FROM => 'lib/B/Source.pm',
           AUTHOR     => 'A. U. Thor <a.u.thor@a.galaxy.far.far.away>') : 
    +()),
    );