Hi there! Thanks for the bug report. This appears to be fixed in newer
versions of Clone and Strawberry Perl, as you can see below.
Please let us know if you run into trouble again and we'll do our best
to fix it.
Cheers!
garu
---------
Microsoft Windows [Version 6.1.7601]
Copyright (c) 2009 Microsoft Corporation. All rights reserved.
C:\Users\Owner\Documents>perl -v
This is perl 5, version 12, subversion 1 (v5.12.1) built for MSWin32-
x86-multi-thread
Copyright 1987-2010, Larry Wall
Perl may be copied only under the terms of either the Artistic License
or the GNU General Public License, which may be found in the Perl 5
source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl". If you have access to
the Internet, point your browser at
http://www.perl.org/, the Perl Home
Page.
C:\Users\Owner\Documents>cpan
cpan shell -- CPAN exploration and modules installation (v1.9600)
Enter 'h' for help.
Show quoted textcpan> install Clone
Fetching with LWP:
http://cpan.strawberryperl.com/authors/01mailrc.txt.gz
Fetching with LWP:
http://cpan.strawberryperl.com/modules/02packages.details.txt.gz
Fetching with LWP:
http://cpan.strawberryperl.com/modules/03modlist.data.gz
Database was generated on Sat, 21 Jul 2012 19:25:48 GMT
Updating database file ...
Done!Running install for module 'Clone'
Running make for G/GA/GARU/Clone-0.33.tar.gz
Fetching with LWP:
http://cpan.strawberryperl.com/authors/id/G/GA/GARU/Clone-0.33.tar.gz
Fetching with LWP:
http://cpan.strawberryperl.com/authors/id/G/GA/GARU/CHECKSUMS
Checksum for C:\strawberry\cpan\sources\authors\id\G\GA\GARU\Clone-
0.33.tar.gz ok
Scanning cache C:\strawberry\cpan\build for sizes
.......................................................................-
----DONE
CPAN.pm: Going to build G/GA/GARU/Clone-0.33.tar.gz
Checking if your kit is complete...
Looks good
Writing Makefile for Clone
Writing MYMETA.yml and MYMETA.json
(C:\strawberry\perl\bin\perl.exe Makefile.PL exited with 0)
CPAN::Reporter: Makefile.PL result is 'pass', No errors.
cp Clone.pm blib\lib\Clone.pm
AutoSplitting blib\lib\Clone.pm (blib\lib\auto\Clone)
C:\strawberry\perl\bin\perl.exe
C:\strawberry\perl\lib\ExtUtils\xsubpp -typemap
C:\strawberry\perl\lib\ExtUtils\typemap Clone.xs > Clone.xsc &&
C:\strawberry\
perl\bin\perl.exe -MExtUtils::Command -e "mv" -- Clone.xsc Clone.c
gcc -c -s -O2 -DWIN32 -DHAVE_DES_FCRYPT -DUSE_SITECUSTOMIZE -
DPERL_IMPL
ICIT_CONTEXT -DPERL_IMPLICIT_SYS -fno-strict-aliasing -mms-bitfields -
DPERL_MSVC
RT_READFIX -O3 -DVERSION=\"0.33\" -DXS_VERSION=\"0.33\" "-
IC:\strawberry\
perl\lib\CORE" Clone.c
Running Mkbootstrap for Clone ()
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644
Clone.bs
C:\strawberry\perl\bin\perl.exe -MExtUtils::Mksymlists \
-e "Mksymlists('NAME'=>\"Clone\", 'DLBASE' => 'Clone', 'DL_FUNCS'
=> { },
'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
dlltool --def Clone.def --output-exp dll.exp
g++ -o blib\arch\auto\Clone\Clone.dll -Wl,--base-file -Wl,dll.base -
mdll -s -L"C
:\strawberry\perl\lib\CORE" -L"C:\strawberry\c\lib" Clone.o
C:\strawberry\perl
\lib\CORE\libperl512.a -lmoldname -lkernel32 -luser32 -lgdi32 -
lwinspool -lcomdl
g32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32 -
lmpr -lw
inmm -lversion -lodbc32 -lodbccp32 -lcomctl32 dll.exp
dlltool --def Clone.def --base-file dll.base --output-exp dll.exp
g++ -o blib\arch\auto\Clone\Clone.dll -mdll -s -
L"C:\strawberry\perl\lib\CORE" -
L"C:\strawberry\c\lib" Clone.o
C:\strawberry\perl\lib\CORE\libperl512.a -lmold
name -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -
lshell32 -lol
e32 -loleaut32 -lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -
lodbc32 -lodb
ccp32 -lcomctl32 dll.exp
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 755
blib\arch\
auto\Clone\Clone.dll
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "cp" -- Clone.bs
blib\arc
h\auto\Clone\Clone.bs
C:\strawberry\perl\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644
blib\arch\
auto\Clone\Clone.bs
(C:\strawberry\c\bin\dmake.EXE exited with 0)
CPAN::Reporter: dmake result is 'pass', No errors.
GARU/Clone-0.33.tar.gz
C:\strawberry\c\bin\dmake.EXE -- OK
Running make test
C:\strawberry\perl\bin\perl.exe "-MExtUtils::Command::MM" "-
e" "test_harness(0,
'blib\lib', 'blib\arch')" t/*.t
t/01array.t ...... ok
t/02hash.t ....... ok
t/03scalar.t ..... ok
t/04tie.t ........ ok
t/05dtype.t ...... ok
t/06refcnt.t ..... ok
t/07magic.t ...... ok
t/08fieldhash.t .. ok
t/dclone.t ....... ok
All tests successful.
Files=9, Tests=69, 1 wallclock secs ( 0.08 usr + 0.06 sys = 0.14 CPU)
Result: PASS
(C:\strawberry\c\bin\dmake.EXE test exited with 0)
CPAN::Reporter: Test result is 'pass', All tests successful.
CPAN::Reporter: preparing a CPAN Testers report for Clone-0.33
CPAN::Reporter: sending test report with 'pass' via Metabase
GARU/Clone-0.33.tar.gz
C:\strawberry\c\bin\dmake.EXE test -- OK
Running make install
Files found in blib\arch: installing files in blib\lib into
architecture depende
nt library tree
Installing C:\strawberry\perl\site\lib\auto\Clone\Clone.dll
Installing C:\strawberry\perl\site\lib\Clone.pm
Appending installation info to C:\strawberry\perl\lib/perllocal.pod
GARU/Clone-0.33.tar.gz
C:\strawberry\c\bin\dmake.EXE install UNINST=1 -- OK
Show quoted textcpan> exit
Lockfile removed.
C:\Users\Owner\Documents>gcc --version
gcc (GCC) 4.4.3
Copyright (C) 2010 Free Software Foundation, Inc.
This is free software; see the source for copying conditions. There is
NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE.
C:\Users\Owner\Documents>