Jan, list,

I didn't actually start looking at the module until after I sent my
first post...

The first few lines of the perlchartdir.pm:
--
package perlchartdir;
require 5.004;

my $CDPLVersion = 0x401;

sub autoImport
{
  my $ver = shift;
  if (!(eval "
    package $ver;
    require DynaLoader;
    \@ISA = qw(DynaLoader);
    bootstrap $ver;
    sub perlchartdir::major_ver { return &major_ver; };
    sub perlchartdir::minor_ver { return &minor_ver; }
    sub perlchartdir::copyright { return &copyright; }
    sub perlchartdir::id { return &id; }
    sub perlchartdir::callMethod { return &callMethod; }
  ") && ($@)) {
    die;
  }
}

if ($] > = 5.008) {
  use Config;
  if (($Config{"useithreads"}) || ($Config{"use5005threads"})) {
    if ($Config{"use64bitint"}) {
      autoImport("perlchartdir58i64mt");
    } else {
      autoImport("perlchartdir58mt");
    }
.
.
.
.

>  -----Original Message-----
>  From: Jan Dubois [mailto:jand@[...].com]
>  Sent: Wednesday, December 12, 2007 1:42 PM
>  To: Brzezinski, Paul J; PDK@[...].com
>  Subject: RE: perlapp - build exe from script but errors when running
>  exe
>  
>  On Wed, 12 Dec 2007, Brzezinski, Paul J wrote:
>  > The script uses a 3rd party module called perlchartdir and it is
>  > installed in C:/tools/ChartDirector/lib.
>  >
>  > So these two lines are in the script:
>  > use lib "C:/tools/ChartDirector/lib";
>  > use perlchartdir;
>  >
>  > When I run the executable on another system, I get the following
>  output:
>  > Use of initialized value in pattern match (m//) at
>  > /<C:\Users\paul\Desktop\AIXperf.exe>DynaLoader.pm line 163.
>  > Can't load 'auto/perlchartdir58mt/perlchartdir58mt.dll' for module
>  > perlchartdir58mt:
>  
>  It looks like the module is using a non-standard DynaLoader mechanism,
>  as the module name is "perlchartdir', but the DLL seems to be called
>  'perlchartdir58mt'.
>  
>  I would try to bind the library explicitly:
>  
>  --bind auto/perlchartdir58mt/perlchartdir58mt.dll[file=
> 
C:/tools/ChartDirector/lib/'auto/perlchartdir58mt/perlchartdir58mt.dll,
>  extract]
>  
>  The line will probably be wrapped, so make sure there are no spaces in
>  the argument to --bind.
>  
>  Cheers,
>  -Jan

_______________________________________________
PDK mailing list
PDK@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs