RE: Cygwin Perl system() Invokes exec() Directly?

RE: Cygwin Perl system() Invokes exec() Directly?

[Lehr, Matt (GEA, 510425)]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 789 bytes --]

Title: RE: Cygwin Perl system() Invokes exec() Directly?





Hello,


>What about permissions?


        It turns out your suspicions about configuration were correct:  I'm trying to keep a minimal installation here and it turns out that none of the packages I've installed contain the Bourne shell.  I've worked around the problem via "ln -s /bin/bash /bin/sh"...

        Thanks for the help...


                                - Matt



--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

RE: Cygwin Perl system() Invokes exec() Directly?

[David Starks-Browning]

On Wednesday 19 Sep 01, Lehr, Matt (GEA, 510425) writes:
> 	It turns out your suspicions about configuration were correct:  I'm
> trying to keep a minimal installation here and it turns out that none of the
> packages I've installed contain the Bourne shell.  I've worked around the
> problem via "ln -s /bin/bash /bin/sh"...

Or you could *solve* the problem by installing ash.  See the entry
"What packages should I download?" in the FAQ.

David


--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

RE: Cygwin Perl system() Invokes exec() Directly?

[Gerrit P. Haase]

Lehr, Matt (GEA, 510425) schrieb am 2001-09-19, 17:10:

>Hello again,
>
> That was quick...
>
>>What is your perl summary (perl-V)?
>
> Please see attached...

Yep, that is o.k.

>>What is pwd?
>
> Hey, you've at least got to give me credit for not falling into that
>trap... :-)
>
>  /usr/bin/perl -e '$x=system("wc",".bashrc");$y=system("wc <
>.bashrc");print"$x $y $!\n";'
> produces
>  5	14	93	.bashrc
>  0 -1 No such file or directory

Strange. Me have (as expected from this nice onliner:
$ /usr/bin/perl -e '$x=system("wc",".bashrc");$y=system("wc <.bashrc");print"$x $y $!\n";'
    211     539    6250 .bashrc
    211     539    6250
0 0

What about permissions?

Gerrit


-- 
=^..^=

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

Re: Cygwin Perl system() Invokes exec() Directly?

[Christopher Faylor]

On Wed, Sep 19, 2001 at 05:10:52PM -0400, Lehr, Matt (GEA, 510425) wrote:
>	That was quick...
>
>>What is your perl summary (perl-V)?
>
>	Please see attached...
>
>>What is pwd?
>
>	Hey, you've at least got to give me credit for not falling into that
>trap... :-)
>
>		/usr/bin/perl -e '$x=system("wc",".bashrc");$y=system("wc <
>.bashrc");print"$x $y $!\n";'
>	produces
>		5	14	93	.bashrc
>		0 -1 No such file or directory

How about the trap of not having 'wc' in your path?  Try explicitly using
/bin/wc in the above example.

cgf

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

RE: Cygwin Perl system() Invokes exec() Directly?

[Lehr, Matt (GEA, 510425)]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 2793 bytes --]

Title: RE: Cygwin Perl system() Invokes exec() Directly?





Hello again,


        That was quick...


>What is your perl summary (perl-V)?


        Please see attached...


>What is pwd?


        Hey, you've at least got to give me credit for not falling into that trap... :-)


                /usr/bin/perl -e '$x=system("wc",".bashrc");$y=system("wc < .bashrc");print"$x $y $!\n";'
        produces
                5       14      93      .bashrc
                0 -1 No such file or directory


        Thanks again...


                                        - Matt


 


Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
  Platform:
    osname=cygwin, osvers=1.3.2(0.3932), archname=cygwin-multi
    uname='cygwin_nt-4.0 loreley 1.3.2(0.3932) 2001-05-20 23:28 i686 unknown '
    config_args='-de -Dusemultiplicity'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=define
    useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='gcc', ccflags ='-DPERL_USE_SAFE_PUTENV -fno-strict-aliasing -I/usr/local/include',
    optimize='-O2',
    cppflags='-DPERL_USE_SAFE_PUTENV -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='2.95.3-5 (cygwin special)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4
    alignbytes=8, usemymalloc=y, prototype=define
  Linker and Libraries:
    ld='ld2', ldflags =' -s -L/usr/local/lib'
    libpth=/usr/local/lib /usr/lib /lib
    libs=-lgdbm -lcrypt
    perllibs=-lcrypt
    libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=libperl5_6_1.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' -s'
    cccdlflags=' ', lddlflags=' -s -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: MULTIPLICITY USE_LARGE_FILES PERL_IMPLICIT_CONTEXT
  Built under cygwin
  Compiled at Aug 22 2001 01:05:05
  @INC:
    /usr/lib/perl5/5.6.1/cygwin-multi
    /usr/lib/perl5/5.6.1
    /usr/lib/perl5/site_perl/5.6.1/cygwin-multi
    /usr/lib/perl5/site_perl/5.6.1
    /usr/lib/perl5/site_perl
    .

Re: Cygwin Perl system() Invokes exec() Directly?

[Gerrit P. Haase]

Lehr, Matt (GEA, 510425) schrieb am 2001-09-19, 15:40:

Hi Matt,

> Seems like the Cygwin perl system() function calls exec() directly
>rather than passing the command to the shell?
>
> For example:
>
> Under Cygwin perl:
>  /usr/bin/perl -e '$x=system("wc < .bashrc");print"$x $!\n";'
> produces the output:
>  -1 No such file or directory

It does it for me:

$ /usr/bin/perl -e '$x=system("wc < .bashrc");print"$x $!\n";'
    211     539    6250
0

What is your perl summary (perl-V)?
What is pwd?

> Under ActiveState perl:
>  /cygdrive/e/Perl/bin/perl -e '$x=system("wc <
>.bashrc");print"$x $!\n";'
> produces the output (as expected):
>  5	14	93
>  0
>
> Thanks for your efforts...  Version information appears below...

Gerrit


-- 
=^..^=

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/

Cygwin Perl system() Invokes exec() Directly?

[Lehr, Matt (GEA, 510425)]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 1440 bytes --]

Title: Cygwin Perl system() Invokes exec() Directly?





Hello,


        Seems like the Cygwin perl system() function calls exec() directly rather than passing the command to the shell?

        For example:


        Under Cygwin perl:
                /usr/bin/perl -e '$x=system("wc < .bashrc");print"$x $!\n";'
        produces the output:
                -1 No such file or directory


        Under ActiveState perl:
                /cygdrive/e/Perl/bin/perl -e '$x=system("wc < .bashrc");print"$x $!\n";'
        produces the output (as expected):
                5       14      93
                0


        Thanks for your efforts...  Version information appears below...


                                - Matt


 


cygcheck.out
--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/


[-- Attachment #2: cygcheck.out --]
[-- Type: text/x-Algol68, Size: 5356 bytes --]


Cygnus Win95/NT Configuration Diagnostics
Current System Time: Wed Sep 19 15:18:39 2001

WinNT Ver 4.0 build 1381 Service Pack 5

Path:	/usr/local/bin
	/usr/bin
	/bin
	/cygdrive/c/WINNT/system32
	/cygdrive/c/WINNT
	/cygdrive/c/DMI/bin
	/cygdrive/c/NETMANAG.32
	/cygdrive/c/WINNT/System32/WBEM
	/cygdrive/c/WINNT/system32/nls
	/cygdrive/c/WINNT/system32/nls/English
	/cygdrive/z
	/cygdrive/w/W31
	/cygdrive/k/O7.16/BIN
	/cygdrive/k/O7.32/BIN
	Z
	.
	/cygdrive/c/Program Files/DevStudio/Vss/WIN32

SysDir: C:\WINNT\System32
WinDir: C:\WINNT

PWD = `/home/Administrator'
USER = `Administrator'
MAKE_MODE = `unix'
HOME = `/home/Administrator'

NUMBER_OF_PROCESSORS = `1'
PROMPT = `$P$G'
LOGONSERVER = `\\AP3PC01APPLGE'
BASELINE = `$/Engineering/Edison Development Team/Edison/04 Implementation/01 Design Guidance/Source Code/Prototype'
OS2LIBPATH = `C:\WINNT\system32\os2\dll;'
COMSPEC = `C:\WINNT\system32\cmd.exe'
NWLANGUAGE = `ENGLISH'
SYSTEMDRIVE = `C:'
HOSTNAME = `NT101991APPLGE'
PROCESSOR_REVISION = `080a'
LOGIN_NAME = `L510425'
_USR = `M:'
PATHEXT = `.COM;.EXE;.BAT;.CMD'
COMPUTERNAME = `NT101991APPLGE'
!E: = `E:\cygwin\bin'
WINDIR = `C:\WINNT'
USERPROFILE = `C:\WINNT\Profiles\l510425'
!S: = `S:\'
PS1 = `\[^[]0;\w\a\w\[^[[0m$^[[32m\] '
HOMESHARE = `\\ap1fs01\users'
SMS_LOCAL_DIR_USER = `C:\WINNT'
VISUAL = `emacs'
MACHTYPE = `i686-pc-cygwin'
!H: = `H:\'
PC_MODEL = `DELL_GX110'
PROCESSOR_IDENTIFIER = `x86 Family 6 Model 8 Stepping 10, GenuineIntel'
WIN32DMIPATH = `C:\DMI\'
_SYSD = `H:'
OS = `Windows_NT'
VIEWER = `emacs'
OLDPWD = `/usr/bin'
PROCESSOR_ARCHITECTURE = `x86'
TEMP = `/cygdrive/c/TEMP'
EDITOR = `emacs'
!W: = `W:\'
PROCESSOR_LEVEL = `6'
SYSTEMROOT = `C:\WINNT'
NWUSERNAME = `L510425'
LOCCODE = `AP1'
TMP = `/cygdrive/c/TEMP'
WINDOWS_LOGIN = `0'
HOMEDRIVE = `\\'
SDC_SERVER = `AP3SDCV1APPLGE'
!K: = `K:\'
SHLVL = `1'
F_SERVER = `AP1DS01'
HOMEPATH = `ap1fs01\users\l510425'
USERDOMAIN = `USERSAPPLGE'
!L: = `L:\'
CD_ROM = `F:'
!Z: = `Z:\'
USERNAME = `L510425'
SHELL = `/bin/bash'
!M: = `M:\Start Menu\PROGRAMS\Cygnus Solutions'
HOSTTYPE = `i686'
OSTYPE = `cygwin'
TERM = `cygwin'
UPDATE_SERVER = `AP1BC01APPLGE'
!N: = `N:\'
TOOL_DRV = `W:'
_ = `/usr/bin/cygcheck'
TZ = `EST5EDT4,M4.1.0/2,M10.5.0/2'

HKEY_CURRENT_USER\Software\Cygnus Solutions
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2
  (default) = `/cygdrive'
  cygdrive flags = 0x00000022
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2\/
  (default) = `E:/cygwin'
  flags = 0x00000002
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2\/usr/bin
  (default) = `E:/cygwin/bin'
  flags = 0x00000002
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\mounts v2\/usr/lib
  (default) = `E:/cygwin/lib'
  flags = 0x00000002
HKEY_CURRENT_USER\Software\Cygnus Solutions\Cygwin\Program Options

a:  fd  FAT        1Mb  39% CP    UN           PKBACK# 001
c:  hd  NTFS    7804Mb  16% CP CS UN PA FC     
d:  hd  FAT     4000Mb   2% CP    UN           
e:  hd  FAT     4094Mb  15% CP    UN           
f:  cd           N/A    N/A                    
h:  net NWFS    2051Mb  36% CP                 SYS
k:  net NWFS   67399Mb  91% CP                 USERS
l:  net NWFS   67399Mb  91% CP                 USERS
m:  net NWFS   67399Mb  91% CP                 USERS
n:  net NWFS   67399Mb  91% CP                 USERS
s:  net NWFS   67399Mb  91% CP                 USERS
t:  net NWFS    5000Mb  53% CP                 APPS
w:  net NWFS   67399Mb  91% CP                 USERS
z:  net NWFS    2051Mb  36% CP                 SYS

E:\cygwin\bin  /usr/bin  user    binmode
E:\cygwin\lib  /usr/lib  user    binmode
E:\cygwin  /        user    binmode
c:    /cygdrive/c  user    binmode,noumount
d:    /cygdrive/d  user    binmode,noumount
e:    /cygdrive/e  user    binmode,noumount
h:    /cygdrive/h  user    binmode,noumount
k:    /cygdrive/k  user    binmode,noumount
l:    /cygdrive/l  user    binmode,noumount
m:    /cygdrive/m  user    binmode,noumount
n:    /cygdrive/n  user    binmode,noumount
s:    /cygdrive/s  user    binmode,noumount
t:    /cygdrive/t  user    binmode,noumount
w:    /cygdrive/w  user    binmode,noumount
z:    /cygdrive/z  user    binmode,noumount

Found: E:\cygwin\bin\bash.exe
Found: E:\cygwin\bin\cat.exe
Not Found: cpp (good!)
Found: E:\cygwin\bin\find.exe
Not Found: gcc
Not Found: gdb
Found: E:\cygwin\bin\ld.exe
Found: E:\cygwin\bin\ls.exe
Found: z:\\ls.exe
Warning: E:\cygwin\bin\ls.exe hides z:\\ls.exe
Not Found: make
Not Found: sh

  701k 2001/09/13 E:\cygwin\bin\cygwin1.dll - os=4.0 img=1.0 sys=4.0
                  "cygwin1.dll" v0.0 ts=2001/9/12 23:54
    Cygwin DLL version info:
        dll major: 1003
        dll minor: 3
        dll epoch: 19
        dll bad signal mask: 19005
        dll old termios: 5
        dll malloc env: 28
        api major: 0
        api minor: 46
        shared data: 3
        dll identifier: cygwin1
        mount registry: 2
        cygnus registry name: Cygnus Solutions
        cygwin registry name: Cygwin
        program options name: Program Options
        cygwin mount registry name: mounts v2
        cygdrive flags: cygdrive flags
        cygdrive prefix: cygdrive prefix
        cygdrive default prefix: 
        build date: Wed Sep 12 23:54:31 EDT 2001
        shared id: cygwin1S3

Use -h to see help about each section