[8036] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 1661 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jan 17 14:17:22 1998

Date: Sat, 17 Jan 98 11:00:23 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Sat, 17 Jan 1998     Volume: 8 Number: 1661

Today's topics:
     Backspacing in output ? (Surinder Singh)
     Re: converting file names down a directory tree <merlyn@stonehenge.com>
     Enumeration under perl <rjsmith@ilnds.com>
     get machine name from IP? <gedavis3@vt.edu>
     How to do random pornography in Perl. (Fred Tunalu)
     Re: How to do random pornography in Perl. <gedavis3@vt.edu>
     Re: installing perl5.004_04 under Linux (DIAL-MB-Edward Finch)
     Re: Logical 'and' in regex? <merlyn@stonehenge.com>
     Re: Logscribe - where ? (Clay Irving)
     Looking for better Text::GenderFromName (Clay Irving)
     Re: parsing sql in perl (using a yacc grammar) <justinb@ebony.cray.com>
     Re: perl compiler status? <merlyn@stonehenge.com>
     Problem compiling 5.004-04 on Linux (Hasan Diwan)
     Re: Puzzling behavior of c.l.p.* readers <merlyn@stonehenge.com>
     Re: Read STDERR from child? (David Efflandt)
     Re: Why does Perl5.0004 use a "Configure" script (M.J.T. Guy)
     Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 17 Jan 1998 17:11:31 GMT
From: ssingh1@xws379.sc.intel.com (Surinder Singh)
Subject: Backspacing in output ?
Message-Id: <69qoo3$d8o@itnews.sc.intel.com>


How can I print to STDOUT something and then
have it backspaced or deleted.
In a program that is slow to run I could, for
instance, print the loop index of the current loop,
then deleted and the new index printed 
when the loop index changes. This saves from having
screen cluttered.

Thanks a lot.


-- 
Surinder

-------------------------------------------------------------------
I speak only for myself, not for my employer
-------------------------------------------------------------------












------------------------------

Date: 17 Jan 1998 10:33:45 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: notsew@wwa.com
Subject: Re: converting file names down a directory tree
Message-Id: <8csoqnknt2.fsf@gadget.cscaper.com>

>>>>> "notsew" == notsew  <notsew@wwa.com> writes:

notsew> might someone suggest a quick way to change all file names (say,
notsew> lowercase them) down a directory tree?

use File::Find;
finddepth sub { my lc = lc $_; rename $_, $lc unless -e $lc }, "/top";

print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 226 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details

-- 
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me


------------------------------

Date: Sat, 17 Jan 1998 12:07:24 -0600
From: Ralph J Smith <rjsmith@ilnds.com>
Subject: Enumeration under perl
Message-Id: <34C0F35C.3C17@ilnds.com>

hello,

I have my 'C' hat on again,  I trying to lose this thing since finding
perl.  So forgive me for asking a 'C' to Perl question.

Does Perl have a way to do enumeration.

	enum{RED,WHITE,BLUE,GREEN};

thanks

Ralph


------------------------------

Date: Sat, 17 Jan 1998 13:28:59 -0500
From: "Jerry Davis" <gedavis3@vt.edu>
Subject: get machine name from IP?
Message-Id: <69qtb7$69n$1@solaris.cc.vt.edu>

one can track the IP of the user who activates a perl script with the
$ENV('REMOTE_ADDR') variable.  Is there a perl command to either get or
convert that to the machine name.
i.e gedavis3.campus.vt.edu.  Mainly I want to be able to track the domain
the user is comming from.

Jerry




------------------------------

Date: 17 Jan 1998 15:46:36 GMT
From: tunalu@geocities.com (Fred Tunalu)
Subject: How to do random pornography in Perl.
Message-Id: <tunalu-1701980749370001@anx-vny0104.deltanet.com>

Need random pornography in Perl?

My newsletter, "The Tiny Lobster" shows you how.

http://www.jbum.com/jbum/tl/

-- 
--
Fred Tunalu
Institute of Druidic Technology
http://www.geocities.com/Athens/Acropolis/5997/


------------------------------

Date: Sat, 17 Jan 1998 13:30:13 -0500
From: "Jerry Davis" <gedavis3@vt.edu>
Subject: Re: How to do random pornography in Perl.
Message-Id: <69qtdi$90m$1@solaris.cc.vt.edu>

Wow.

What an excellant use of machine resources!

Jerry

Fred Tunalu wrote in message ...
>Need random pornography in Perl?
>
>My newsletter, "The Tiny Lobster" shows you how.
>
>http://www.jbum.com/jbum/tl/
>
>--
>--
>Fred Tunalu
>Institute of Druidic Technology
>http://www.geocities.com/Athens/Acropolis/5997/




------------------------------

Date: 17 Jan 1998 17:48:11 GMT
From: efinch@sun.vais.net (DIAL-MB-Edward Finch)
Subject: Re: installing perl5.004_04 under Linux
Message-Id: <69qqsr$esk@netaxs.com>

Bernard M. Piller (bernard@look.in.signature) wrote:
: Finally I give up and whine to this group.

: For days now I tried to install perl5.004_04 (from CPAN) on my Linux box
: (AMD K6, Kernel 2.0.33).
: At first I had the "You have a BIG! problem" error during sh configure,
: because some library paths were wrong.
: When I found this out I finally got a config.sh and Makefile.
: But during make I get a whole lot of error messages. I even installed
: gcc 2.7.2.3 (had 2.7.2 before).

: Could someone who succesfully installed Perl5.004 on Linux please send
: me his/her config.sh?

: Thank you very much,
: Bernard

I recently upgraded to Red Hat 5.0. I was having a lot of problems with
perl, and was told that it is broken in the distribution; there's an
upgrade available from http://www.redhat.com. I installed it, but haven't
had time to test it.

Regards,
Ed
--
Ed Finch
UNIX & ClearCase Administrator
NASA's Earth Observation System, "Mission To Planet Earth"
 
   Linux. Because using the Windows 95 interface is like living
   in "Who Framed Roger Rabbit?".
 
                       - me



------------------------------

Date: 17 Jan 1998 10:37:25 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: kherron@campus.mci.net (Kenneth Herron)
Subject: Re: Logical 'and' in regex?
Message-Id: <8coh1bknmy.fsf@gadget.cscaper.com>

>>>>> "Kenneth" == Kenneth Herron <kherron@campus.mci.net> writes:

Kenneth> Something like
Kenneth> 	@list = ($breakfast =~ /bacon|eggs|hashbrowns|juice/);

Kenneth> will extract all of the matching, non-overlapping substrings into
Kenneth> @list.  All that remains is to uniquify @list--the FAQ describes
Kenneth> three methods--and check how many values you have.  For example:

Kenneth> 	undef %hash;
Kenneth> 	@hash{($breakfast =~ /bacon|eggs|hashbrowns|juice/)} = ();
Kenneth> 	if ((scalar keys %hash) == 4) {
Kenneth> 		...
Kenneth> 	}

That looks a bit clumsy.  How about this:

    {
	local $_ = $breakfast;
	# eat 'em up as we go... :-)
	$good = s/bacon// && s/eggs// && s/hashbrowns// && s/juice//;
    }

print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 226 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details

-- 
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me


------------------------------

Date: 17 Jan 1998 12:32:16 -0500
From: clay@panix.com (Clay Irving)
Subject: Re: Logscribe - where ?
Message-Id: <69qpv0$c5i@panix.com>

In <34c0ab56.1852596@news.virgin.net> notreallyianj@notreallytrials.co.uk (anti-spam - remove 'notreally') (Ian Johnston) writes:

>I'm looking for a copy of LOGSCRIBE, the Perl Web Page stats analyser.
>The site it is usually available from
>(http://www.texas.net/~cedras/logscribe/) is not responding (well, the
>download link anyway) and via email they don't respond. Could anybody
>let me know if they have a copy. Use the email address below.
>ian.johnston4@virgin.net

It's working now. Other distribution sites are:

 http://www.cs.utexas.edu/users/usamaw
 http://www.texas.net/~cedras/html
 http://acm.vt.edu/~nisha

-- 
Clay Irving <clay@panix.com>                  I think, therefore I am. I think? 
http://www.panix.com/~clay/


------------------------------

Date: 17 Jan 1998 12:21:13 -0500
From: clay@panix.com (Clay Irving)
Subject: Looking for better Text::GenderFromName
Message-Id: <69qpa9$bsv@panix.com>

Text::GenderFromName returns undefined for Mark, Bob, Bill, Ralph, etc.
Has anyone built better regexps to catch more male names?

-- 
Clay Irving <clay@panix.com>                  I think, therefore I am. I think? 
http://www.panix.com/~clay/


------------------------------

Date: 17 Jan 1998 11:39:07 -0600
From: Justin Banks <justinb@ebony.cray.com>
Subject: Re: parsing sql in perl (using a yacc grammar)
Message-Id: <o8noh1bj8zo.fsf@ebony.cray.com>

joshua@purestuff.com (Joshua Burgin) writes:

> Anyone know of a good way to parse SQL in perl?

Well, it may not be what you had in mind, but I routinely do :

use DBI;
$drh = DBI->install_driver('Oracle');
$dbh=$drh->connect( $inst, $usr, $pwd, 'Oracle' );

 ...
$sql = read_sql();
my $csr = $dbh->prepare("$sql") || bletch("Can't $sql\n " . $dbh->errstr);

-justinb

-- 
Justin Banks     \ if the answer is the same whether you're programming 
Silicon Graphics \ in Perl, C, or Visual Modula 17++ with JavaBeans and 
Eagan, Minnesota \ Digital Satellite TV Support, it's not a Perl question.


------------------------------

Date: 17 Jan 1998 10:46:45 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: root@web1.valley-internet.com (Chris Ochs)
Subject: Re: perl compiler status?
Message-Id: <8cd8hrkn7e.fsf@gadget.cscaper.com>

>>>>> "Chris" == Chris Ochs <root@web1.valley-internet.com> writes:

Chris> We have some programs written in perl that we would like to
Chris> market commercially, but for two primary reasons we cannot give
Chris> out source.

And you've already thoroughly read the FAQ item on this?

I'd say you should just write the CC-handling communication stuff in
C, then link it into a static Perl using "h2xs" and "makeaperl".
That's close enough for jazz, and protects your agreements with the
vendors with whom you've signed NDAs.

There is no Perl Compiler (current or planned) that won't be TRIVIAL
to reverse-engineer.  Truly.  This is not the point of the compiler
project.  To expect otherwise is foolish.

print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 226 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details

-- 
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me


------------------------------

Date: 17 Jan 1998 13:01:21 -0500
From: hdiwan@shell.clark.net (Hasan Diwan)
Subject: Problem compiling 5.004-04 on Linux
Message-Id: <69qrlh$c9n@shell.clark.net>
Keywords: Linux perl 5.004-04

Error log on Linux 2.0.33 + glibc given below, please assist in solving
the problem, if it is a glibc problem, I will notify them. But I suspect
something changed between 5.004-01 and 5.004-04 as I was able to compile
5.004-1 without trouble on my system. Thanks for your help!

	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from miniperlmain.c:14:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from miniperlmain.c:14:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from gv.c:20:
                 from perlio.h:23,
                 from perl.h:181,
                 from perl.c:15:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from perl.c:15:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from gv.c:20:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from toke.c:15:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from toke.c:15:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from perly.y:17:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from perly.y:17:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from op.c:19:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from op.c:19:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from regcomp.c:57:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from regcomp.c:57:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from dump.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from dump.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from util.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from util.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from mg.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from mg.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
mg.c: In function `Perl_magic_get':
mg.c:558: warning: passing arg 2 of `getgroups' from incompatible pointer type
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from hv.c:15:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from hv.c:15:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from av.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from av.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from run.c:11:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from run.c:11:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from pp_hot.c:19:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from pp_hot.c:19:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from sv.c:15:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from sv.c:15:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from pp.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from pp.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from scope.c:16:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from scope.c:16:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from pp_ctl.c:20:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from pp_ctl.c:20:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
	  CCCMD =  cc -DPERL_CORE -c -Dbool=char -DHAS_BOOL -I/usr/local/include -O2   
In file included from /usr/include/_G_config.h:9,
                 from /usr/include/libio.h:31,
                 from /usr/include/stdio.h:29,
                 from perlsdio.h:5,
                 from perlio.h:23,
                 from perl.h:181,
                 from pp_sys.c:18:
/usr/include/gnu/types.h:75: warning: `__NFDBITS' redefined
/usr/include/linux/posix_types.h:30: warning: this is the location of the previous definition
/usr/include/gnu/types.h:77: warning: `__FDMASK' redefined
/usr/include/linux/posix_types.h:42: warning: this is the location of the previous definition
In file included from /usr/include/linux/resource.h:4,
                 from /usr/include/sys/resource.h:11,
                 from pp_sys.c:30:
/usr/include/linux/time.h:30: warning: `FD_SET' redefined
/usr/include/sys/select.h:60: warning: this is the location of the previous definition
/usr/include/linux/time.h:31: warning: `FD_CLR' redefined
/usr/include/sys/select.h:61: warning: this is the location of the previous definition
/usr/include/linux/time.h:32: warning: `FD_ISSET' redefined
/usr/include/sys/select.h:62: warning: this is the location of the previous definition
/usr/include/linux/time.h:33: warning: `FD_ZERO' redefined
/usr/include/sys/select.h:63: warning: this is the location of the previous definition
/usr/include/linux/time.h:39: warning: `ITIMER_REAL' redefined
/usr/include/sys/time.h:84: warning: this is the location of the previous definition
/usr/include/linux/time.h:40: warning: `ITIMER_VIRTUAL' redefined
/usr/include/sys/time.h:87: warning: this is the location of the previous definition
/usr/include/linux/time.h:41: warning: `ITIMER_PROF' redefined
/usr/include/sys/time.h:91: warning: this is the location of the previous definition
In file included from /usr/include/sys/time.h:25,
                 from perl.h:400,
                 from pp_sys.c:18:
/usr/include/sys/select.h:45: warning: redefinition of `fd_mask'
/usr/include/sys/types.h:16: warning: `fd_mask' previously declared here
/usr/include/sys/select.h:48: warning: redefinition of `fd_set'
/usr/include/linux/types.h:9: warning: `fd_set' previously declared here
In file included from /usr/include/linux/resource.h:4,
                 from /usr/include/sys/resource.h:11,
                 from pp_sys.c:30:
/usr/include/linux/time.h:12: redefinition of `struct timeval'
/usr/include/linux/time.h:17: redefinition of `struct timezone'
/usr/include/linux/time.h:48: redefinition of `struct itimerval'
pp_sys.c: In function `Perl_pp_sselect':
pp_sys.c:804: warning: passing arg 2 of `select' from incompatible pointer type
pp_sys.c:804: warning: passing arg 3 of `select' from incompatible pointer type
pp_sys.c:804: warning: passing arg 4 of `select' from incompatible pointer type
make: *** [pp_sys.o] Error 1



------------------------------

Date: 17 Jan 1998 10:41:06 -0700
From: Randal Schwartz <merlyn@stonehenge.com>
To: rjk@coos.dartmouth.edu
Subject: Re: Puzzling behavior of c.l.p.* readers
Message-Id: <8ck9bzkngt.fsf@gadget.cscaper.com>

>>>>> "Chipmunk" == Chipmunk  <rjk@coos.dartmouth.edu> writes:

Chipmunk> Can we pleeeeeez not have another discussion on this!

Chipmunk> comp.lang.perl.misc is NOT the appropriate newsgroup for debating this topic.

And what about THAT?

There's always some looney in the crowd that says "hey, this shouldn't
be discussed here... please take to to rec.aquaria!"

Why *is* that?

:-)

print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 226 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details

-- 
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me


------------------------------

Date: Sat, 17 Jan 1998 18:01:34 GMT
From: efflandt@xnet.com (David Efflandt)
Subject: Re: Read STDERR from child?
Message-Id: <34c0eadb.4045872@flood.xnet.com>

Apparently this is not covered in the perlfaq (or the reply from Tom
Christiansen), but maybe should be.  It works.

Now if I could just find a faq on redirection so I can figure out how
to the following (my 'man bash' lacks multiple redirection info):

1. Capture STDERR from one external process in real time (instead of
after it exits) and STDOUT >file.

	&&

2. Process data from STDERR part 1 and send it to STDIN of 2nd
external process in real time and leave STDOUT of the second process
alone.  All attempts at part 2 either result in no display or an
initial display and no screen update until all data has been sent.

Trying to display dialog guage which currently sits at 0% until it's
all over then shoots to 100% (works properly from the keyboard in the
shell).

vallon@mindspring.com (Justin Vallon) wrote:

>David, I think this is what you were asking for:
>
>* How do I capture stderr, but leave stdout and stdin alone?
>
>#!/usr/local/bin/perl5 -w
>
>local $cmd = 'grep . /tmp/foo /etc/motd /tmp/bar';
>
>$| = 1;
>
>print "Before\n";
>local $stderr = `$cmd 3>&1 1>&2 2>&3 3>&-`;
># "Redirect" STDOUT to 3, STDERR to STDOUT, 3 to STDERR, and close 3
>print "After\n";
>print "stderr is '$stderr'\n";
>
>You can even replace $cmd with something interactive.  $cmd will get
>stdin from perl's STDIN, and its STDOUT will go to perl's STDOUT.  Only
>STDERR will be captured in $stderr.


David Efflandt/Elgin, IL USA
efflandt@xnet.com    http://www.xnet.com/~efflandt/


------------------------------

Date: 17 Jan 1998 16:35:32 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Why does Perl5.0004 use a "Configure" script
Message-Id: <69qmkk$cu5$1@lyra.csx.cam.ac.uk>

Randal Schwartz  <merlyn@stonehenge.com> wrote:
>And if you want default answers to everything, just do what I do:
>
>	gtar xfz perl5.004_04.tar.gz
>	cd perl5.004_04
>	./Configure -ders -Dcc=gcc -Dprefix=$HOME && make test all install
>
>There.  Three commands.  No interaction required.  Put'em in a script
>if you want. :-)

And you can leave out the 'all', since make install forces that.

Pity it doesn't force 'test' as well.


Mike Guy


------------------------------

Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.

To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.

To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.

The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.

The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.

For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.


------------------------------
End of Perl-Users Digest V8 Issue 1661
**************************************

home help back first fref pref prev next nref lref last post