Below is my log I copy/paste without any change.
All commands OK.
I can't start ppm when current dir is "NOT /Perl/bin"!
Microsoft Windows XP [Version 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.
C:\Documents and Settings\admin>cd \
C:\>cd Perl/bin
C:\Perl\bin>perl -x -S ppm
PPM - Programmer's Package Manager version 3.2.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm> quit
C:\Perl\bin>perl -x ppm
PPM - Programmer's Package Manager version 3.2.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm> quit
C:\Perl\bin>perl ppm
PPM - Programmer's Package Manager version 3.2.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm> quit
C:\Perl\bin>perl -x -S ppm3
PPM - Programmer's Package Manager version 3.2.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm> quit
C:\Perl\bin>perl -x ppm3
PPM - Programmer's Package Manager version 3.2.
Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
ActiveState is a division of Sophos.
Entering interactive shell. Using Term::ReadLine::Perl as readline library.
Type 'help' to get started.
ppm> quit
C:\Perl\bin>ppm help
Type 'help command' for more detailed help on a command.
Commands:
describe - describes packages in detail
exit - exits the program
help - prints this screen, or help on 'command'
install - installs packages
profiles - manage PPM profiles
properties - describes installed packages in detail
q - exits the program
query - queries installed packages
quit - exits the program
remove - uninstalls packages
repository - adds, removes, or sets repositories
s - searches for packages in a repository
search - searches for packages in a repository
settings - view or set PPM options
targets - views or sets target installer backends
tree - shows package dependency tree
uninstall - uninstalls packages
unset - view or set PPM options
upgrade - shows availables upgrades for installed packages
version - displays the PPM version (3.2)
Extra Help Topics: (not commands)
ppm_migration - guide for those familiar with PPM
prompt - how to interpret the PPM prompt
quickstart - a crash course in using PPM
unicode - notes about unicode author names
C:\Perl\bin>perl -V
Summary of my perl5 (revision 5 version 8 subversion 7) configuration:
Platform:
osname=MSWin32, osvers=5.0, archname=MSWin32-x86-multi-thread
uname=''
config_args='undef'
hint=recommended, useposix=true, d_sigaction=undef
usethreads=define use5005threads=undef useithreads=define
usemultiplicity=define
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cl', ccflags ='-nologo -Gf -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE
-DNO_STRICT -DHAVE_DE
S_FCRYPT -DBUILT_BY_ACTIVESTATE -DNO_HASH_SEED -DUSE_SITECUSTOMIZE
-DPERL_IMPLICIT_CONTEXT -DPERL_IM
PLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX',
optimize='-MD -Zi -DNDEBUG -O1',
cppflags='-DWIN32'
ccversion='12.00.8804', gccversion='', gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='__int64',
lseeksize=8
alignbytes=8, prototype=define
Linker and Libraries:
ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf
-libpath:"C:\Perl\lib\CORE" -ma
chine:x86'
libpth=\lib
libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib advapi32.lib sh
ell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib
winmm.lib version.lib od
bc32.lib odbccp32.lib msvcrt.lib
perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib advapi32.li
b shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib
winmm.lib version.li
b odbc32.lib odbccp32.lib msvcrt.lib
libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl58.lib
gnulibc_version='undef'
Dynamic Linking:
dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf
-libpath:"C:\Perl\lib
\CORE" -machine:x86'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY USE_ITHREADS USE_LARGE_FILES
USE_SITECUSTOMIZE PERL_IMPLICIT_CONTEXT
PERL_IMPLICIT_SYS
Locally applied patches:
ActivePerl Build 813 [148120]
Iin_load_module moved for compatibility with build 806
PerlEx hacks for CGI::Carp
Less verbose ExtUtils::Install and Pod::Find
instmodsh upgraded from ExtUtils-MakeMaker-6.25
24699 ICMP_UNREACHABLE handling in Net::Ping
21540 Fix backward-compatibility issues in if.pm
Built under MSWin32
Compiled at Jun 6 2005 13:36:37
C:[EMAIL PROTECTED]@PPM\tag>DigestMD5.pl
Enter filename (fully qualified path) or Ctrl-C to exit
/Perl/bin/ppm
d9bccb1f2a0197b35e40be2de4dcc403
Enter filename (fully qualified path) or Ctrl-C to exit
/Perl/bin/ppm3
d9bccb1f2a0197b35e40be2de4dcc403
Enter filename (fully qualified path) or Ctrl-C to exit
Terminating on signal SIGINT(2)
C:[EMAIL PROTECTED]@PPM\tag>
Regards,
Hirosi Taguti
[EMAIL PROTECTED]
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On
> Behalf Of Sisyphus
> Sent: Saturday, November 19, 2005 2:26 PM
> To: 田口 浩; [email protected]
> Subject: Re: Can't start ppm command
>
>
> ----- Original Message -----
> From: <[EMAIL PROTECTED]>
> To: <[email protected]>
> Sent: Saturday, November 19, 2005 2:08 PM
> Subject: RE: Can't start ppm command
>
>
> > > Check that there are no spaces (or anything else) before the
> > > #!. The #!
> > > needs to be at the very start of the first line.
> >
> > No space nor any.
> >
> > > In addition to 'ppm.bat' and 'ppm3.bat' being identical,
> > > 'ppm' and 'ppm3'
> > > should also be the same as each other. Can you confirm that
> > > they are the
> > > same as each other ?
> >
> > 'ppm.bat' and 'ppm3.bat' are identical. and
> > 'ppm' and 'ppm3' are identical. By WinMerge!
> >
> >
> > > Somewhere 'perl -x' is calling a file that doesn't begin with
> > > a '#!perl'.
> >
> > ???
>
> The only place I can see 'perl -x' calling a file is in
> ppm.bat which calls
> 'perl -x -S ppm' and in ppm3.bat which calls 'perl -x -S
> ppm3'. The former
> fails, but the latter works .... which doesn't make sense
> since you say that
> 'ppm3' and 'ppm' are identical. (I'd feel happier about
> accepting that if
> you could do a MD5 digest of those - and confirm that it
> reports the same
> for both. Use the script below for that. WinMerge is probably
> reliable, but
> I really don't know.)
>
> What happens if you cd to the perl\bin folder and enter:
> perl -x -S ppm
>
> That should get you into the ppm interactive shell. I get:
>
> -- start --
> E:\Perl815\bin>perl -x -S ppm
> PPM - Programmer's Package Manager version 3.3.
> Copyright (c) 2001 ActiveState Corp. All Rights Reserved.
> ActiveState is a division of Sophos.
>
> Entering interactive shell. Using Term::ReadLine::Perl as
> readline library.
>
> Type 'help' to get started.
>
> ppm> quit
>
> E:\Perl815\bin>
> -- finish --
>
> What happens when you enter (from perl\bin folder):
> perl -x ppm
>
> What happens when you enter (from perl\bin folder):
> perl ppm
>
> What happens when you enter (from perl\bin folder):
> perl -x -S ppm3
>
> What happens when you enter (from perl\bin folder):
> perl -x ppm3
>
> What happens when you enter (from any folder):
> ppm help
>
> What version of Windows are you running ? (ie 95, 98, 2000,
> NT, XP, etc. ?)
>
> Which build of AS perl is it ?
>
> It's the '.zip' package ... right ? What did you use to
> unpack the zip file
> ?
>
> Cheers,
> Rob
>
> Does the following script report the same digest for both
> files 'ppm' and
> 'ppm3' (ie the 2 files without extensions that get called by
> 'ppm.bat' and
> 'ppm3.bat').
>
> use Digest::MD5;
> use warnings;
>
> while(1) {
> print "\nEnter filename (fully qualified path) or Ctrl-C to exit\n";
> $f = <STDIN>;
> chomp($f);
>
>
> open(FILE, $f) or die "Can't open FILE: $!";
> binmode(FILE);
>
> $md5 = Digest::MD5->new;
> while (<FILE>) {
> $md5->add($_);
> }
> close(FILE);
> print $md5->hexdigest;
>
> }
>
> _______________________________________________
> Perl-Win32-Users mailing list
> [email protected]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
