Mon Feb 06 17:52:12 2017: Request 120127 was acted upon.
Transaction: Ticket created by james.rushwo...@bozobus.net
       Queue: PAR-Packer
     Subject: PAR::Packer DynaLoader Problem On Strawberry Perl 5.24.1
   Broken in: (no value)
    Severity: (no value)
       Owner: Nobody
  Requestors: james.rushwo...@bozobus.net
      Status: new
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=120127 >


The attached script when compiled with Strawberry Perl pp on 64bit Windows
10 creates an executable which will not run on a 64 bit Windows 10 machine
which does not have Strawberry Perl installed, it won't run on a 64bit
Windows 7 machine without Strawberry Perl installed either. The program
will not run on a machine with ActiveState Perl installed giving the same
error message.

This is the error message:

Can't load
'C:\Users\NTHOMP~1\AppData\Local\Temp\par-6e74686f6d70736f6e\cache-a689a490f84fa6e443fb002bba992a32a268b542\e88b1fb1.xs.dll'
for module Tk::PNG: load_file:The specified module could not be found at
C:/Perl64/perl/lib/DynaLoader.pm line 193.
    at C:/Perl64/perl/vendor/lib/PAR/Heavy.pm line 123.
Compilation failed in require at script/module_test.pl line 39.
BEGIN failed--compilation aborted at script/module_test.pl line 39.

all of the modules after the DynaLoader comment cause a variation of this
error message.

This is the Perl version:

C:\Users\james\perlapp>perl -v

This is perl 5, version 24, subversion 1 (v5.24.1) built for
MSWin32-x64-multi-thread

and this is the module version:

C:\Users\james>perl -MPAR::Packer -le "print $PAR::Packer::VERSION"
1.036




#!/usr/bin/perl
#
use warnings;
use strict;
#
use Tk;
use Tk::LabFrame;
use Tk::BrowseEntry;
use Tk::Dialog;
use Tk::DialogBox;
use Tk::ROText;
use Tk::NoteBook;
use Tk::WorldCanvas;
use Tk::Pane;
use Tk::FontDialog;
use Tk::Panedwindow;
use Tk::WorldCanvas;
use Tk::Splash;
#
use Time::SoFar qw( runtime runinterval figuretimes );
use Cwd;
use File::Touch;
use File::Basename;
use File::MMagic;
use File::Copy;
use Spreadsheet::ParseExcel;
use Spreadsheet::WriteExcel::Big;
use Excel::Writer::XLSX;
use String::CRC::Cksum qw(cksum);
use Tie::Watch;
use List::Compare::Functional qw/get_unique get_complement/;
use Carp;
use Scalar::Util::Numeric qw(isnum);
use Number::Format qw(:subs);
use Getopt::Long;
use DBI;
use DBD::Oracle;
# DynaLoader fails with Strawberry Perl PAR::Packer
use Tk::PNG;
use Tk::Spectrum;
use Tk::HyperText;
use Spreadsheet::ParseXLSX;


Reply via email to