[6919] in Perl-Users-Digest
Perl-Users Digest, Issue: 544 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri May 30 15:10:20 1997
Date: Fri, 30 May 97 12:00:26 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Fri, 30 May 1997 Volume: 8 Number: 544
Today's topics:
Re: /x <eike.grote@theo.phy.uni-bayreuth.de>
Re: any editor for perl?--any editor written in Perl? (O'Shaughnessy Evans)
Re: any editor for perl? (Hope this helps!)
Re: any editor for perl? <lentdm@cig.mot.com>
Re: Any plans for perl plug-ins? <rootbeer@teleport.com>
chsh script <brandon@physics.utexas.edu>
Re: getting started.. jkean@ix.netcom.com
Good Perl Tutorial with exercises ?? <jhg@austx.tandem.com>
Re: Help writing a perl script.. <rootbeer@teleport.com>
Re: How to directly interact with a cgi-script somewher (Thomas Honigmann)
Re: How to directly interact with a cgi-script somewher (Hope this helps!)
How to get the PID of a system call ? <p-joann@uiuc.edu>
Re: libwww GET problem <sneddon@world.std.com>
Re: MACPERL - is it (Bob Wilkinson)
Re: Need vacation program in Perl! <mkruse@shamu.netexpress.net>
Re: Need vacation program in Perl! <piet@cs.ruu.nl>
Re: Need vacation program in Perl! <q13382@bang.cig.mot.com>
Re: Need vacation program in Perl! <q13382@bang.cig.mot.com>
Re: OS/2 : Backticks causing runtime crash (Pol GATILLE)
os2 : unpack() bug || misfeature ? (Pol GATILLE)
Perl 4 still installed (O'Shaughnessy Evans)
Read a file to $wholefile <lauri@nettipaja.clinet.fi>
Serial I/O <basc@asu.uswest.net>
Re: Socket reading <minaret@sprynet.com>
socketpair (Keith Ford)
Sorting by values (min-woong sohn)
thread tracing on server ? <102646.1641@CompuServe.COM>
Re: Where to find POSIX.pm??? (O'Shaughnessy Evans)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 30 May 1997 15:54:03 +0200
From: Eike Grote <eike.grote@theo.phy.uni-bayreuth.de>
Subject: Re: /x
Message-Id: <338EDBFB.41C6@theo.phy.uni-bayreuth.de>
Hi,
kendall shaw wrote:
>
> Extended regexps in my perl 5.004 don't seem to woark:
Nope, you are wrong ...
> I'm getting results that I don't expect:
Then you expect the wrong things to happen ...
> This:
>
> $asdf = '<PARA CONTINUE="1" LINE-SPACING="11" PARATYPE="07Body text" >';
>
> $_ = $asdf;
>
> s/PARA\ CONTINUE=...\ .*?PARATYPE=(\".*?\")\ */
> PARA\ CONTINUE=\"1\"\ PARATYPE=$1/x;
> print $_ unless /PARATYPE FONT-FAMILY/;
>
> produces:
>
> <
> PARA CONTINUE="1" PARATYPE="07Body text">
It's supposed to do so ...
> But if I remove the newline and space from the right hand side
> (pretend "\ PARATYPE" is joined with the previous line") :
>
> s/PARA\ CONTINUE=...\ .*?PARATYPE=(\".*?\")\ */PARA\ CONTINUE=\"1\"
> \ PARATYPE=$1/x;
>
> I get what I want:
>
> <PARA CONTINUE="1" PARATYPE="07Body text">
That's fine, too.
> Is this a bug?
No. The search-and-replace operator's syntax is like this:
s/regexp/replacement/options
There's a regular expression (which can be extended with the 'x'
option) only in the _search_ part of the operator, whereas the
replacement part gets printed as is (maybe some interpolation is
done there ...).
Bye, Eike
--
======================================================================
Eike Grote, Theoretical Physics IV, University of Bayreuth, Germany
----------------------------------------------------------------------
e-mail -> eike.grote@theo.phy.uni-bayreuth.de
WWW -> http://www.phy.uni-bayreuth.de/theo/tp4/members/grote.html
http://www.phy.uni-bayreuth.de/~btpa25/
======================================================================
------------------------------
Date: 30 May 1997 18:00:31 GMT
From: shaug@callamer.com (O'Shaughnessy Evans)
Subject: Re: any editor for perl?--any editor written in Perl?
Message-Id: <5mn4jv$pkd$3@zinger.callamer.com>
> I haven't seen it, but I hear that there's a version of vi which uses
> embedded Perl, so you can use Perl code to edit your files. I've gotta try
> that. :-)
Wow, that's a teaser! Sooo, has anybody else heard of this -- if so,
howzabout a URL?
- O'Shaughnessy Evans
- UNIX/Internet Systems Administrator, GST Call America; SLO, Ca
- "I'm about to write you a reality check..." -- The Tick
------------------------------
Date: 30 May 1997 10:41:00 -0500
From: scribble@wwa.com (Hope this helps!)
Subject: Re: any editor for perl?
Message-Id: <5mmsec$23a@shoga.wwa.com>
In article <338EA3E3.4F60@nstate.net>,
TRG Custom Graphics <customdesign@nstate.net> wrote:
>set at.. (more hacking probably).. oh well.. I think pico and vi are
>both poor online edtors, and I end up having to FTP most of the time.. t
>sometimes does short wraps without warning.. ERROR.. *cringe*.. f
>anyone knows of any better onoine editors that aren't pico or vi, please
>inform me...
Since you do use vi, your best bet is to get better used to it,
approaching it with unprejudiced eye and without negative attitude.
With a few macros, it's simply the best editor for Perl, in fact
most of the time all I have to do in vi is hit a few well-timed
tabs and it writes the code I wanted.
------------------------------
Date: Fri, 30 May 1997 12:19:46 -0500
From: "Dave M. Lent [I]" <lentdm@cig.mot.com>
Subject: Re: any editor for perl?
Message-Id: <338F0C32.41C67EA6@cig.mot.com>
Hope this helps! wrote:
>
> In article <338EA3E3.4F60@nstate.net>,
> TRG Custom Graphics <customdesign@nstate.net> wrote:
> >set at.. (more hacking probably).. oh well.. I think pico and vi are
> >both poor online edtors, and I end up having to FTP most of the time.. t
> >sometimes does short wraps without warning.. ERROR.. *cringe*.. f
> >anyone knows of any better onoine editors that aren't pico or vi, please
> >inform me...
>
> Since you do use vi, your best bet is to get better used to it,
> approaching it with unprejudiced eye and without negative attitude.
> With a few macros, it's simply the best editor for Perl, in fact
> most of the time all I have to do in vi is hit a few well-timed
> tabs and it writes the code I wanted.
Also, try emacs or Xemacs.
------------------------------
Date: Fri, 30 May 1997 08:17:53 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: Mark Nielsen <men2@auto.med.ohio-state.edu>
Subject: Re: Any plans for perl plug-ins?
Message-Id: <Pine.GSO.3.96.970530081526.11819I-100000@kelly.teleport.com>
On 30 May 1997, Mark Nielsen wrote:
> Would it be possible to create a plug-in which would interpret perl
> commands? -- so that you wouldn't have to program in java.
I think you're looking for the Penguin project. Pengiun can do all of the
main things that Java can do, except that it works on more kinds of
systems, it uses Perl, and it fails to send a stream of money to Sun. :-)
You'll find it on CPAN. Hope this helps!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: Fri, 30 May 1997 13:11:47 -0500
From: "Brandon W. Metcalf" <brandon@physics.utexas.edu>
Subject: chsh script
Message-Id: <338F1863.41C6@physics.utexas.edu>
Here is a script that I wrote to allow NIS users to change their shell.
I'm using a setuid C wrapper to execute the script. Two questions. Is
there a better way to edit-in-place the passwd.yp file with having to
split the pertinent line into different variables - it seems like a
waste to have to declare so many variables just for editing purposes.
Second, is there anything about this script that is a security risk?
Thanks.
--
#!/usr/local/bin/perl
# so that perl doesn't complain about an insecure path
$ENV{'PATH'} = '/';
($name, $passwd, $uid, $gid, $q, $c, $gcos, $dir, $shell) =
getpwuid($<);
print <<"MSG";
Current available shells:
/bin/bash
/bin/csh
/bin/tcsh
/bin/ksh
/bin/sh
/bin/bsh
${name}'s current login shell:
$shell
MSG
print "Change shell (y/n): ";
chomp($reply = <STDIN>);
exit if ($reply =~ /n/i);
print "Enter new shell: ";
chomp($newshell = <STDIN>);
# need to add in checking for a valid shell
$newentry = join(':', $name,$passwd,$uid,$gid,$gcos,$dir,$newshell);
$pwdfile = '/etc/passwd.yp';
local($^I, @ARGV) = ('.bak', $pwdfile);
while (<>) {
if (/^$name:/) {
print "$newentry\n";
} else {
print;
}
close ARGV if eof;
}
chown 0, 0, $pwdfile, '$pwdfile.bak';
chmod 0660, $pwdfile, '$pwdfile.bak';
system("cd /var/yp; /bin/make passwd 1> /dev/null 2>&1");
--
Brandon Metcalf
UNIX Systems Administrator
Department of Physics - UT Austin
brandon@physics.utexas.edu
------------------------------
Date: Fri, 30 May 1997 16:43:43 GMT
From: jkean@ix.netcom.com
Subject: Re: getting started..
Message-Id: <338f02fb.6279813@nntp.ix.netcom.com>
I had the same problem. when you type perl filename.pl you need to
add .txt, as notepad saves it as a text file. So perl filename.pl.txt
is what worked for me. (at least for hello world) If anyone has any
other suggestions for us newbies, I'd sure like to hear.....good
luck.On Thu, 29 May 1997 15:38:49 +0200, "Markus Ulsa_"
<ulsass@berlin.snafu.de> wrote:
>Arathena Sprankle wrote:
>
>> I am just getting started with learning how to pogram in perl in order
>> to
>> make cgi scripts for my web page. I understand the language fairly
>> well....I have only one problem. How to get started? I downloaded perl
>> 5.
>> Is this the right program to make my filename.pl files? When I tried
>> to
>> write to the dos box opened when I exucuted perl.exe I couldn't save
>> the
>> file from there. Instead I transfered it to notepad and saved it as
>> filename.pl. But how then do I test the file? I know I need to type
>> "perl
>> filename.pl" while in the same dir but it doesn't work. I am running
>> on Win
>> 95/dos. If only I could get how to make and exxcute the files I will
>> be
>> well on my way. PLease help.
>>
>> marien@goodnet.com
>
> Hi there,
>
>the problem is, that PERL was originally created for Unix (and the
>longer I do PERL on Win95 an NT I understand why :-) ).
>But for the beginning of understanding and writing things like "Hello
>World" try WinPerl from Maxwell Nairn Andrews. This great Prog compiles,
>executes and debugs PERL on Win95 and NT. Just write your .pl and
>execute it with WinPerl (Freeware).
>
>After you get your first success with this, install Perl for Win32 on
>your machine. Take one of the most recent versions from
>http://www.perl.com .
>This will also add registry-settings to your Win 95 and NT. Then you can
>execute and debug from the command-line in a Dos-Box.
>
>You get WinPerl from here
>http://www.servtech.com/public/spider/perl32b3.zip
>
>Regards,
>
>Markus
>
>See you at:
> http://www.inx.de/~ulsass
>
------------------------------
Date: Fri, 30 May 1997 13:26:45 -0500
From: Jim Garrison <jhg@austx.tandem.com>
Subject: Good Perl Tutorial with exercises ??
Message-Id: <338F1BE5.31DF@austx.tandem.com>
Has anyone written a good Perl tutorial that has
well-written, meaningful exercises?
--
James Garrison mailto:jhg@mpd.tandem.com
Tandem Computers, Inc
14231 Tandem Blvd, Rm 1038 Phone: (512) 432-8455
Austin, TX 78728-6699 Fax: (512) 432-2118
------------------------------
Date: Fri, 30 May 1997 08:28:24 -0700
From: Tom Phoenix <rootbeer@teleport.com>
To: Ashwin Bihari <abihari@cs.uml.edu>
Subject: Re: Help writing a perl script..
Message-Id: <Pine.GSO.3.96.970530082343.11819K-100000@kelly.teleport.com>
On 30 May 1997, Ashwin Bihari wrote:
> The logic should be something along the lines of checking the testname,
> and the machine it was run and finding the HIGHEST cpu time for that
> test on any given machine,
If I understand this, a good way to get what you want is to run through
the list of times, saving the highest one.
$highest = -1; # dummy start value
for (@times) { $highest = $_ if $_ > $highest }
Of course, you can replace @times with whatever you need to get a list of
times.
> The next is to compare the results of EACH machine to the base machine
> which is the machine named boaz which is a HPJ200 type machine, so once
> I read in the name boaz I have to create a few variables so that I can
> compare things to it later on...
I hope that you're not saying that you use soft references to make
variables at runtime. This would be better handled by hard references, as
described in perlref.
Hope this helps!
-- Tom Phoenix http://www.teleport.com/~rootbeer/
rootbeer@teleport.com PGP Skribu al mi per Esperanto!
Randal Schwartz Case: http://www.lightlink.com/fors/
------------------------------
Date: 30 May 1997 16:26:34 GMT
From: honig@kummer.mathematik.hu-berlin.de (Thomas Honigmann)
Subject: Re: How to directly interact with a cgi-script somewhere on a server?
Message-Id: <5mmv3q$1i0@suncom.rz.hu-berlin.de>
In article <5mkeob$ph1@shoga.wwa.com>, Hope this helps! wrote:
>In article <01bc6beb$e780dd40$78ec2aca@walter.swiftech.com.sg>,
>Walter Klomp <walter@swiftech.com.sg> wrote:
>[...]
>>if I telnet into the machine and I type
>>
>>GET xxx.cgi?type=yyy&var1=zzz&var2=aaa
>>
>>apparently the var1 and var2 never come over, neither does it work when I
>>do a POST xxx.cgi ...
>
>POSTed data goes in the body of the http message, not in the URL.
Right. Also RFC 1945 (Hypertext Transfer Protocol -- HTTP/1.0) says that
a valid Content-Length is required on all HTTP/1.0 POST requests.
So you might try
POST /xxx.cgi?type=yyy HTTP/1.0
Content-length: 17
var1=zzz&var2=aaa
The empty line is necessary to seperate header and body of the
request.
>One good web client which will do what you want is LWP::UserAgent.
>Specifically, the utility lwp-request which comes with the LWP
>distribution will do the post request you want; reading its man
>page is the best way to know how.
I agree. But if you really want to dive into the internals you
have to read RFC 1945.
------------------------------
Date: 30 May 1997 12:17:38 -0500
From: scribble@wwa.com (Hope this helps!)
Subject: Re: How to directly interact with a cgi-script somewhere on a server?
Message-Id: <5mn23i$miq@shoga.wwa.com>
In article <5mmv3q$1i0@suncom.rz.hu-berlin.de>,
Thomas Honigmann <honig@kummer.mathematik.hu-berlin.de> wrote:
>In article <5mkeob$ph1@shoga.wwa.com>, Hope this helps! wrote:
>>In article <01bc6beb$e780dd40$78ec2aca@walter.swiftech.com.sg>,
>>Walter Klomp <walter@swiftech.com.sg> wrote:
>>[...]
>>>if I telnet into the machine and I type
>>>
>>>GET xxx.cgi?type=yyy&var1=zzz&var2=aaa
>>>
>>>apparently the var1 and var2 never come over, neither does it work when I
>>>do a POST xxx.cgi ...
>>
>>POSTed data goes in the body of the http message, not in the URL.
>
>Right. Also RFC 1945 (Hypertext Transfer Protocol -- HTTP/1.0) says that
>a valid Content-Length is required on all HTTP/1.0 POST requests.
>So you might try
>
>POST /xxx.cgi?type=yyy HTTP/1.0
>Content-length: 17
>
>var1=zzz&var2=aaa
>
>The empty line is necessary to seperate header and body of the
>request.
>
>>One good web client which will do what you want is LWP::UserAgent.
>>Specifically, the utility lwp-request which comes with the LWP
>>distribution will do the post request you want; reading its man
>>page is the best way to know how.
>
>I agree. But if you really want to dive into the internals you
>have to read RFC 1945.
Hope this helps, Walter!
------------------------------
Date: Fri, 30 May 1997 13:34:44 -0500
From: Georgios Pappas <p-joann@uiuc.edu>
Subject: How to get the PID of a system call ?
Message-Id: <338F1DC4.41C6@uiuc.edu>
Hello,
I looked over the FAQ but I couldn't find this.
The question is how to get the process ID of a child created by
the system call. My problem is that I have a system call in a loop and
it keeps forking processes, which eventually causes some of them not
to be spawned due to reaching the limit of processes in the shell.
In getting the child PID I could use waitpid to wait for the
command completion. Is this the best way to do that, or are there
smarter options?
Thanks in advance
Georgios
------------------------------
Date: Fri, 30 May 1997 12:14:02 -0700
From: "Scott F. Sneddon" <sneddon@world.std.com>
Subject: Re: libwww GET problem
Message-Id: <338F26FA.41C6@world.std.com>
Jason A. Soloff wrote:
>
> Hi all..
>
> First, sorry for the crosspost (.misc and .modules) but I think
> that it fits both.
>
> Anyway, I am using libwww 5.08 on perl 5.003 on an IRIX system
> (SGI's). I am trying to do a basic, simple GET request to a
> public HTTP server. Have not been able to get any real data back,
> just error messages from the server.
>
> The only line really doing much is the request(xxx,xxx,xxx,xxx) call.
> The weird thing, and this is where I am confused is that my code
> works just fine on one system, but not on another, so the code is
> OK.
>
> The errors are bad client request, and bad response from server.
> If I just use a pure socket call, the socket will not connect from
> the machine with the problem, but WILL connect and bind on the one
> that works.
>
> I think there is a problem in the configuration for the TCP/IP
> networking on the problem machine, but am not sure where to look
> for it. I don't have enough access to poke around, but would
> appreciate any advice as to where to direct my sysadmin.
>
> Thanks,
>
> Jason
Jason,
does either machine use a proxy-server to access the web?? How to set
up libwww to use proxies is in the docs.
Just a thought.
Scott.
--
Scott F. Sneddon Ph.D.
Research Fellow, Drug Discovery
Genzyme Corporation
One Kendall Square
Cambridge MA 02139
E-mail: sneddon@world.std.com
------------------------------
Date: Thu, 29 May 1997 17:41:48 +0100
From: b.wilkinson@pindar.co.uk (Bob Wilkinson)
Subject: Re: MACPERL - is it
Message-Id: <b.wilkinson-2905971741480001@ip57-york.pindar.co.uk>
In article <FAQ-NOT-FOR-EMAIL-2905970655000001@bohdan.dialup.access.net>,
FAQ-NOT-FOR-EMAIL@Tryzub.com (Bohdan Peter Rekshynskyj) wrote:
>
> still alive?
>
> I see the last updates (perl.com) around July of last year...
>
> Is there a MacPerl email list?
>
> Thanks!
>
> Bohdan
>
> PS - please email me at Bohdan@TRYZUB.com - I do not have
> daily access here. Thanks! 8-)
Hello,
It is still alive - latest version based on perl5.002. Expect one based on
5.004 soonish.
Send mail with body "subscribe" to mac-perl-request@iis.ee.ethz.ch to subscribe
to the mailing list.
Bob
--
I have become death, destroyer of the worlds.
------------------------------
Date: 30 May 1997 15:47:27 GMT
From: Matt Kruse <mkruse@shamu.netexpress.net>
Subject: Re: Need vacation program in Perl!
Message-Id: <5mmsqf$f8u@news1-alterdial.uu.net>
Tom Phoenix <rootbeer@teleport.com> wrote:
: Seriously, why do you want one written in Perl? The available program is
: pretty versatile and efficient; I don't see much reason to re-write it. Is
: there something that it won't do for you?
I needed one a while ago because 'vacation' was not installed on the machine
I was using the admin refused to install it.
I did find a perl 'vacation' somewhere. I don't remember where.
Searching www.dejanews.com will be helpful.
--
Matt Kruse
mkruse@netexpress.net
http://mkruse.netexpress.net/ http://www.mkstats.com/
---------------------------------------------------------------------------
------------------------------
Date: 30 May 1997 17:58:00 +0200
From: Piet van Oostrum <piet@cs.ruu.nl>
Subject: Re: Need vacation program in Perl!
Message-Id: <wzvi412bqv.fsf@kemmel.cs.ruu.nl>
>>>>> Mongkol Horburapa <q13382@bang.cig.mot.com> (MH) writes:
MH> Hi,
MH> Anyone can provide me with vacation program in Perl?
MH> Thanks,
Maybe if you supply a correct email address
The original message was received at Fri, 30 May 1997 10:55:31 -0500 (CDT)
from motgate.mot.com [129.188.136.100]
----- The following addresses have delivery notifications -----
<q13382@bang.cig.mot.com> (unrecoverable error)
----- Transcript of session follows -----
550 <q13382@bang.cig.mot.com>... Host unknown (Name server: bang.cig.mot.com: host not found)
--
Piet van Oostrum <piet@cs.ruu.nl>
URL: http://www.cs.ruu.nl/~piet [PGP]
------------------------------
Date: Fri, 30 May 1997 23:45:41 +0700
From: Mongkol Horburapa <q13382@bang.cig.mot.com>
To: Tom Phoenix <rootbeer@teleport.com>
Subject: Re: Need vacation program in Perl!
Message-Id: <338F0435.E034B979@bang.cig.mot.com>
Tom Phoenix wrote:
>
> On Fri, 30 May 1997, Mongkol Horburapa wrote:
>
> > Anyone can provide me with vacation program in Perl?
>
> exec 'vacation'; # :-)
>
> Works for me!
>
> Seriously, why do you want one written in Perl? The available program
> is
> pretty versatile and efficient; I don't see much reason to re-write
> it. Is
> there something that it won't do for you?
>
> -- Tom Phoenix http://www.teleport.com/~rootbeer/
> rootbeer@teleport.com PGP Skribu al mi per Esperanto!
> Randal Schwartz Case: http://www.lightlink.com/fors/
Because my mail server is running on HP-UX box.
It doesn't have vacation program on it.
I don't know why.
Thanks,
------------------------------
Date: Fri, 30 May 1997 23:49:50 +0700
From: Mongkol Horburapa <q13382@bang.cig.mot.com>
To: Piet van Oostrum <piet@cs.ruu.nl>
Subject: Re: Need vacation program in Perl!
Message-Id: <338F052E.70B3519B@bang.cig.mot.com>
Piet van Oostrum wrote:
>
> >>>>> Mongkol Horburapa <q13382@bang.cig.mot.com> (MH) writes:
>
> MH> Hi,
> MH> Anyone can provide me with vacation program in Perl?
>
> MH> Thanks,
>
> Maybe if you supply a correct email address
>
> The original message was received at Fri, 30 May 1997 10:55:31 -0500
> (CDT)
> from motgate.mot.com [129.188.136.100]
>
> ----- The following addresses have delivery notifications -----
> <q13382@bang.cig.mot.com> (unrecoverable error)
>
> ----- Transcript of session follows -----
> 550 <q13382@bang.cig.mot.com>... Host unknown (Name server:
> bang.cig.mot.com: host not found)
>
> --
> Piet van Oostrum <piet@cs.ruu.nl>
> URL: http://www.cs.ruu.nl/~piet [PGP]
I provided the correct email, though.
It might be the problem on my company's gateway.
Could You try sending to q13382@bkkhp1.bang.cig.mot.com ?
Thanks,
------------------------------
Date: Fri, 30 May 1997 05:33:34 GMT
From: pgatille@online.fr (Pol GATILLE)
Subject: Re: OS/2 : Backticks causing runtime crash
Message-Id: <339065f2.2938586@snews.zippo.com>
On Thu, 29 May 1997 12:29:37 -0400, Craig <craig@indelible-blue.com>
wrote:
>I am running OS/2 V4 w/fixpack. I am having problems using the
>backticks under Perl 5.03.05. When I run the following code:
>
> #!/usr/bin/perl
> print "Hey";
> `dir`;
>
>Hey is returned to STDOUT, then I get a popup window with system error
>SYS3135. I have tried several other commands within the backticks, but
>I get the same response each time.
>
>If anyone has used the ``s successfully under OS/2, what config changes
>did you have to make first?
>
>Craig
Backticks spawns sh shell (from env PERL_SH_DIR)
to use CMD.EXE internals try
system "cmd.exe", "dir";
no config changes needed.
Pol
------------------------------
Date: Fri, 30 May 1997 05:38:49 GMT
From: pgatille@online.fr (Pol GATILLE)
Subject: os2 : unpack() bug || misfeature ?
Message-Id: <339166b5.3134013@snews.zippo.com>
I tried recently to uudecode a mail with the Camel book
example of uudecode.
The resulting zip I got were corrupted because all '0A' have been
converted to '0A0D'.
Do I miss someting ?
Is there a way to overcome this bug ?
Pol
------------------------------
Date: 30 May 1997 17:56:02 GMT
From: shaug@callamer.com (O'Shaughnessy Evans)
Subject: Perl 4 still installed
Message-Id: <5mn4bi$pkd$2@zinger.callamer.com>
> Having recently accepted delivery of two new Unix boxes from "industry
> leaders" and typed 'perl -v', the leading version digit was *NOT* 5.
> If your management forbids you to install upgrades that don't come
> from the vendor, then unfortunately perl 4 is a fact of life.
On the Sun boxes for computer science students at Cal Poly SLO [1],
they only have Perl4 installed. You'd think, that of all places,
that would be a useful location for Perl5. I have the feeling that
it's not used much there -- most CSC students I know haven't done
much, or any, programming in scripting languages. I think they're really
missing out -- but then, so is a lot of the industry that hasn't figured
out how useful Perl can be.
[1] California Polytechnic State University in San Luis Obispo.
--
- O'Shaughnessy Evans
- UNIX/Internet Systems Administrator, GST Call America; SLO, Ca
- "I'm about to write you a reality check..." -- The Tick
------------------------------
Date: Wed, 28 May 1997 23:04:10 +0300
From: Lauri Laakso <lauri@nettipaja.clinet.fi>
Subject: Read a file to $wholefile
Message-Id: <338C8FBA.2538@nettipaja.clinet.fi>
Ho I can read whole $message.dat file to $wholefile, I am using it
when I send multiple emails.
....................................................................
Lauri Laakso - Nettipaja - GSM: 358+40-588 8889 [EMAIL2GSM]
http://www.nettipaja.clinet.fi/ - mailto:lauri@nettipaja.clinet.fi
------------------------------
Date: Sun, 25 May 1997 23:34:54 -0700
From: basc <basc@asu.uswest.net>
Subject: Serial I/O
Message-Id: <33892F0E.2B41@asu.uswest.net>
New to perl. Have scanned FAQ and newsgroups. Need to do some I/O
to a serial port on a HP 715 workstation (hpux 9.07). Anyone have some
perl code to jumpstart me? Most appreciated.
bill
basc@asu.uswest.net
------------------------------
Date: 30 May 1997 15:15:59 GMT
From: "Geoff Mottram" <minaret@sprynet.com>
Subject: Re: Socket reading
Message-Id: <01bc6d0c$1d4c3520$f8d4aec7@cactus>
> Ok... I have this problem. I have a socket that I want to read line by
> line... just one line at a time, but I can't just use <FILEHANDLE>
because
> I need to get back to my program every second on the second. The more
> accurate the timing is the better. I looked up sirc:s sources and it has
a
> buffer in wich it reads data and takes it line by line from there and
> selects the inputs. Is there a better way?
Why not use FILEHANDLE? Just set an alarm to go off every second to handle
whatever has to happen every second. Note that the UNIX timer is not as
accurate as you seem to need. You may need to use a different timing
package.
--
Geoff Mottram
minaret@sprynet.com
------------------------------
Date: 30 May 1997 12:39:24 -0500
From: keford@vespucci.iquest.com (Keith Ford)
Subject: socketpair
Message-Id: <5mn3cc$pu3@vespucci.iquest.com>
Trying to run a perl script that uses socketpair. I tried it on SCO and Win32
but socketpair is unimplemented. Does anyone know of a work-around?
--
Keith Ford <keford@magicbbs.com> Micro Magic (205)971-9711
The home of Web Spinner, WorldGrouper, Phoenix, and more...
Come see us at http://www.magicbbs.com
------------------------------
Date: Fri, 30 May 1997 16:30:31 GMT
From: soh3@midway.uchicago.edu (min-woong sohn)
Subject: Sorting by values
Message-Id: <EB05uw.Lt7@midway.uchicago.edu>
Hello.
I'd like to know if there is a way of printing
the contents of an associative array sorted by
values (in descending order) rather than sorted
by keys as documented in the Programming Perl book.
Any help will be greatly appreciated.
Min
------------------------------
Date: 26 May 1997 10:52:49 GMT
From: richard ferry <102646.1641@CompuServe.COM>
Subject: thread tracing on server ?
Message-Id: <5mbq21$t8$1@mhafc.production.compuserve.com>
we are installing a chargeback feature on our intranet server. is
there a way to track when users sign on and then off ? i dont
know if this forum is correct for this question. if not, my
apologies.
------------------------------
Date: 30 May 1997 17:40:13 GMT
From: shaug@callamer.com (O'Shaughnessy Evans)
Subject: Re: Where to find POSIX.pm???
Message-Id: <5mn3dt$pkd$1@zinger.callamer.com>
In article <33872DEA.1778@rocler.qc.ca>,
Jean-Francois Menard <jfm@rocler.qc.ca> writes:
> I just downloaded PERL for Win32. The final perl scripts I make runs on
> a UNIX systm but I use a Win32 system for developping and debugging.
...
> I am just looking for a file called POSIX.pm that is sufficient for me
> to do :
My guess is that there's no POSIX.pm for a Win32 implementation of Perl
because Win32 software (WFW or Win95?) isn't POSIX-compliant. If
there's a Perl for NT, you might be able to find it there, but then
that will only be useful if you're running NT :)
--
- O'Shaughnessy Evans
- UNIX/Internet Systems Administrator, GST Call America; SLO, Ca
- "I'm about to write you a reality check..." -- The Tick
------------------------------
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 544
*************************************
