[19040] in Perl-Users-Digest
Perl-Users Digest, Issue: 1235 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jul 3 09:05:45 2001
Date: Tue, 3 Jul 2001 06:05:21 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <994165520-v10-i1235@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 3 Jul 2001 Volume: 10 Number: 1235
Today's topics:
array of arrays of arrays (Alexvalara)
Re: array of arrays of arrays nobull@mail.com
Re: FAQ 9.15: How do I decode a CGI form? newbie ?s <"goodrow"@opencity. com>
FAQ Multidimensional Arrays <u9jdf@csc.liv.ac.uk>
Re: FAQ Multidimensional Arrays <ubl@schaffhausen.de>
Re: Havin' some trouble with sockets... (Kevin Reid)
Re: Highlight message in DOS <andrew@mvt.ie>
Re: How to run SUN perl script in HP-UX? (Richard J. Rauenzahn)
How to timeout a socket recv under win32? <tanghh@ha.org.hk>
Re: lvalue functions nobull@mail.com
Re: lvalue functions <nospam-abuse@ilyaz.org>
Re: lvalue functions <nospam-abuse@ilyaz.org>
Re: New babies to Perl - FREE Documentation Require <bart.lateur@skynet.be>
Re: New babies to Perl - FREE Documentation Require (nambit)
no such file... <sibylle.ramseier@uniresear.ch>
Re: no such file... (Clinton A. Pierce)
Re: onMouseover in Perl? <gnarinn@hotmail.com>
Pooling perl processes? <prarie dawn @hotmail.com>
Re: ref($val) not returning anything? (Mike Eggleston)
Re: Settings locale failed (Anno Siegel)
Re: SMTP, should be simple <noemail@noemail.com>
Re: Using Array and while() loops (Steven Smolinski)
web fetching (Mark)
Re: web fetching (Tony L. Svanstrom)
Re: web fetching <pne-news-20010703@newton.digitalspace.net>
Re: Where I can find BINMODE, any examples ??? <joe@bloggs.com>
Re: Where I can find BINMODE, any examples ??? <pne-news-20010703@newton.digitalspace.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 03 Jul 2001 11:34:53 GMT
From: alexvalara@aol.com (Alexvalara)
Subject: array of arrays of arrays
Message-Id: <20010703073453.18448.00001624@ng-cq1.aol.com>
I have the following data structure: @A=(@B,@C...), where @B=(@B1,@B2),
@C=(@C1,@C2).
How can i store an element in @B1 and how can i print the content of that
array?
Thanks
Alexandros V
------------------------------
Date: 03 Jul 2001 12:44:56 +0100
From: nobull@mail.com
Subject: Re: array of arrays of arrays
Message-Id: <u93d8ei6dj.fsf@wcl-l.bham.ac.uk>
alexvalara@aol.com (Alexvalara) writes:
> Subject: array of arrays of arrays
perldoc perllol
> I have the following data structure: @A=(@B,@C...), where @B=(@B1,@B2),
> @C=(@C1,@C2).
Right, there's you problem. Surely you meant:
@A=(\@B,\@C), where @B=(\@B1,\@B2), @C=(\@C1,\@C2).
Of course in the normal course of events all these arrays except @A
would be anonymous and quite possibly autovivified.
> How can i store an element in @B1 and how can i print the content of that
> array?
$A[0][0][7]='this is going in the 8th element of @B1';
print 'Content of @B1: ',join(',' => @{$A[0][0]}), "\n";
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Tue, 03 Jul 2001 03:17:22 -0400
From: Jason Goodrow <"goodrow"@opencity. com>
Subject: Re: FAQ 9.15: How do I decode a CGI form? newbie ?s
Message-Id: <9hrrav$hnv$1@news.panix.com>
>
>
> I don't follow. A beginner's instinct says to write your own function
> rather than use an already written-reviewed-debugged function?
>
> I would think that beginners would want to write less code, not more...
Just to explain - I'm a newbie/hobbiest and none of my coding is mission
critical. I enjoy programming and plan to keep learning.
If you want to build bicycles, why not learn about wheels by reinventing
them?
That way if the wheel stops turning you at least know where to look instead
of hitting the newsgroup with: what is CGI.pm doing to linebreaks (for
instance) or how to store input without URL decode.
Deconsturcting the module is definately a great place to start and I'll try
again.
Hopefully this isn't flame-bait. This newsgroup has been a fantastic help to
this newbie when roadblocked.
goodrow@panix.com
------------------------------
Date: Tue, 3 Jul 2001 11:42:53 GMT
From: "J.D. Fieldsend" <u9jdf@csc.liv.ac.uk>
Subject: FAQ Multidimensional Arrays
Message-Id: <3B41AFBD.1CC1C268@csc.liv.ac.uk>
Is it possible to use multidimensional arrays in Perl?
------------------------------
Date: Tue, 03 Jul 2001 14:52:23 +0100
From: Malte Ubl <ubl@schaffhausen.de>
Subject: Re: FAQ Multidimensional Arrays
Message-Id: <3B41CE17.76A01EFC@schaffhausen.de>
"J.D. Fieldsend" schrieb:
>
> Is it possible to use multidimensional arrays in Perl?
Not natively, but nested arrays are probably what you are looking for.
There is even a syntax that makes em look like real multidimensional arrays
Bye,
->malte
------------------------------
Date: Tue, 03 Jul 2001 12:27:49 GMT
From: kpreid@attglobal.net (Kevin Reid)
Subject: Re: Havin' some trouble with sockets...
Message-Id: <1evxth3.1a0ccle6g742N%kpreid@attglobal.net>
Chad <chadc@printelligent.com> wrote:
> I was having some trouble opening up sockets with perl. I followed
> O'Rielly's reference book, but it still has trouble.
>
> #!/usr/bin/perl
>
> use Socket;
>
> $socket = IO::Socket::INET->new("10.0.0.218:518") || die "Couldn't
> open printer : $!\n";
You need to 'use IO::Socket;' instead. (Socket is the low-level access,
IO::Socket is the neatly-wrapped-up stuff.)
Also, IO::Socket::INET->new requires arguments in key-value form:
$socket = IO::Socket::INET->new(
Proto => 'tcp',
PeerAddr => '10.0.0.218:518',
) or die "Couldn't open printer : $!\n";
--
Kevin Reid: | Macintosh:
"I'm me." | Think different.
------------------------------
Date: Tue, 3 Jul 2001 11:12:31 +0100
From: "Andrew" <andrew@mvt.ie>
Subject: Re: Highlight message in DOS
Message-Id: <9hs7l6$thh$1@kermit.esat.net>
"Anthony" <hoa@nortelnetworks.com> wrote in message
news:9hddag$5t$1@bcarh8ab.ca.nortel.com...
> Hi all,
>
> My perl script run on WinNT which prints out messages to DOS prompt when
> errors were occurred. I want to highlight some keywords in the messages.
If
> anyone knows what are the special characters to turn on/off highlight or
> change color in DOS prompt?
>
Use the Win32::Console module.
------------------------------
Date: 2 Jul 2001 18:42:44 GMT
From: nospam@hairball.cup.hp.com (Richard J. Rauenzahn)
Subject: Re: How to run SUN perl script in HP-UX?
Message-Id: <994099320.922066@hpvablab.cup.hp.com>
Bart Lateur <bart.lateur@skynet.be> writes:
>Jean Niu wrote:
>
>>I got a perl script that written by perl 5.0.0.4 on Sun. It works fine
>>on SUN.
>>But now, I need run it on HP-UX 11.00, I have perl 5.0.0.4 on HP as
>>well.
>>But when I run it, it failed. through out many syntax errors.
>>
>>Do you have any ideas how can I run it HP? Do I need to change any code?
>
>It's 5.004. But anyway, if this is indeed (roughly) the same perl
>version, you shouldn't have any syntax errors. The only thing that could
>happen is that certain modules are missing. But that's not the case, is
>it? There's not an error like"Cannot find Foo/BAr.pm in @INC (@INC
>contains ...)" or similar?
The OP might be using /usr/contrib/bin/perl, which only includes the
perl binary. But that isn't Perl5 until 11i (11.11) -- and it's..
$ /usr/contrib/bin/perl -v
This is perl, version 5.005_02 built for PA-RISC1.1
[...]
Rich
--
Rich Rauenzahn ----------+xrrauenza@cup.hp.comx+ Hewlett-Packard Company
Technical Consultant | I speak for me, | 19055 Pruneridge Ave.
Development Alliances Lab| *not* HP | MS 46TU2
ESPD / E-Serv. Partner Division +--------------+---- Cupertino, CA 95014
------------------------------
Date: Tue, 03 Jul 2001 16:34:16 +0800
From: Horace <tanghh@ha.org.hk>
Subject: How to timeout a socket recv under win32?
Message-Id: <3B418388.3212A2F@ha.org.hk>
Hi everyone,
I'm new to perl and sorry if this question has been asked before,
that's how to timeout a socket recv under win32 environmnet? I know that
under unix, I can use "alarm", but how about win32?
I saw some people suggested using "vec" and "select" to implement
the timeout, but I don't know how.
Please help and thanks in advance!
Best Regards,
Horace Tang
------------------------------
Date: 03 Jul 2001 07:46:12 +0100
From: nobull@mail.com
Subject: Re: lvalue functions
Message-Id: <u9ae2mik7f.fsf@wcl-l.bham.ac.uk>
Ilya Zakharevich <nospam-abuse@ilyaz.org> writes:
> [A complimentary Cc of this posting was sent to
Would you please stop that. You should only CC people on Usenet posts
when there is some reason to belive that there is a need for expedited
response. As it happens you have drawn to my attension that my
mail.com account was failing.
> <nobull@mail.com>], who wrote in article <u9k81uzfh6.fsf@wcl-l.bham.ac.uk>:
> > > > use LvalueSubWithSeperateFetchAndStoreMethods func => {
> > > > FETCH => sub { $private },
> > > > STORE => sub { $private = shift },
> > > > };
> > >
> > > Why do you discuss syntax where semantic would not work?
>
> > > Remember cryptocontext?
> >
> > Remember it? I've never even heard of it!
>
> Then lookup for it!
Where? It's not in the standard docs. A web and Usenet search finds
uses of the word but does not define it. From context it appears to
be an obfuscated way of saying "subroutine call context".
> sub foo {print shift}
> sub bar {...}
>
> foo bar;
>
> What is the context of bar()?
List, because &foo has no prototype.
So "Remember cryptocontext?" is your obfuscated way of saying "your
solution only works for scalar functions". (I case it's not obvious,
by "scalar function" I mean a function whose list context return value
is a singleton list containing its scalar context return value.)
Yes, I knew that. I had inferred that the OP was primarily seeking a
solution for scalar lvalue functions and wasn't going to be bothered
if it didn't apply in the general case. Do you have a reason to
suspect otherwise?
--
\\ ( )
. _\\__[oo
.__/ \\ /\@
. l___\\
# ll l\\
###LL LL\\
------------------------------
Date: Tue, 3 Jul 2001 07:55:13 +0000 (UTC)
From: Ilya Zakharevich <nospam-abuse@ilyaz.org>
Subject: Re: lvalue functions
Message-Id: <9hrtp1$17ib$1@agate.berkeley.edu>
[A complimentary Cc of this posting was sent to
<nobull@mail.com>], who wrote in article <u9ae2mik7f.fsf@wcl-l.bham.ac.uk>:
> > [A complimentary Cc of this posting was sent to
>
> Would you please stop that.
Cannot promise to remember this. But my setup grants Mail-Copies-To: never.
> Where? It's not in the standard docs. A web and Usenet search finds
> uses of the word but does not define it. From context it appears to
> be an obfuscated way of saying "subroutine call context".
It means that using context to implement DWIM is evil, since the
context is quite often not what naive heuristics suggest.
> > sub foo {print shift}
> > sub bar {...}
> >
> > foo bar;
> >
> > What is the context of bar()?
>
> List, because &foo has no prototype.
Nope. It is an lvalue-list, not list.
Ilya
------------------------------
Date: Tue, 3 Jul 2001 08:03:00 +0000 (UTC)
From: Ilya Zakharevich <nospam-abuse@ilyaz.org>
Subject: Re: lvalue functions
Message-Id: <9hru7k$17sj$1@agate.berkeley.edu>
I wrote in article <9hrtp1$17ib$1@agate.berkeley.edu>:
> [A complimentary Cc of this posting was sent to
>
> <nobull@mail.com>], who wrote in article <u9ae2mik7f.fsf@wcl-l.bham.ac.uk>:
> > > [A complimentary Cc of this posting was sent to
> >
> > Would you please stop that.
>
> Cannot promise to remember this.
Oups, I even forgot to do this on that reply... Where are my 18 years? :-(
Ilya
------------------------------
Date: Tue, 03 Jul 2001 09:36:43 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: New babies to Perl - FREE Documentation Require
Message-Id: <of43ktokpd4r26rp1rcuqjhun53vmmsgpk@4ax.com>
Kelvin Wong wrote:
>'m a new babies in Perl Programming and does anyone know where can i get
>the FREE documentation of learning Perl Programming?
>
>Any suggested URL?
This is not THE free documentation, but it's pretty decent anyway:
<http://www.cs.cf.ac.uk/Dave/PERL/>
--
Bart.
------------------------------
Date: 3 Jul 2001 06:00:02 -0700
From: nambit@hotmail.com (nambit)
Subject: Re: New babies to Perl - FREE Documentation Require
Message-Id: <b2fb1d0a.0107030500.6d4cc82@posting.google.com>
"Kelvin Wong" <kvwong@singnet.com.sg> wrote in message news:<9holud$437$1@dahlia.singnet.com.sg>...
> I'm a new babies in Perl Programming and does anyone know where can i get
> the FREE documentation of learning Perl Programming?
i know it's not what you asked, but you really should look at buying
the O'Reilly books _Learning_Perl_ and _Programming_Perl_ they are
very good.
not free, i grant you, but i promise you'll be glad you got them.
daniel
------------------------------
Date: Tue, 3 Jul 2001 11:13:34 +0200
From: "Sibylle Ramseier" <sibylle.ramseier@uniresear.ch>
Subject: no such file...
Message-Id: <9hs28a$qg8$1@rex.ip-plus.net>
The following error message occur. What's wrong with the path of the file ?
open ../login/login.txt: No such file or directory at
D:\User\bki\cgi-bin\bki3.pl line 6.
The code is:
#!/usr/bin/perl -w
use strict;
use CGI ':standard';
use CGI::Carp 'fatalsToBrowser';
my $datei = '../login/login.txt';
open DATEI,">>$datei" or die "open $datei: $!";
foreach my $param (param()) {
print DATEI $param,'=',join('|', param($param)),"\n";
}
print DATEI "---\n";
close DATEI;
print "Location: ../html/knowwebpubl.htm\n\n";
__END__
Thanks a lot for help.
Sibylle
--
_____________________________________________
Uniresearch AG, Informatik-Kompetenzzentrum
Gibel 2, 5037 Muhen
Phone: ++41-62-737 55 22
Fax: ++41-62-737 55 29
Email: sibylle.ramseier@uniresear.ch
Online: http://www.uniresear.ch
_____________________________________________
--
_____________________________________________
Uniresearch AG, Informatik-Kompetenzzentrum
Gibel 2, 5037 Muhen
Phone: ++41-62-737 55 22
Fax: ++41-62-737 55 29
Email: sibylle.ramseier@uniresear.ch
Online: http://www.uniresear.ch
_____________________________________________
------------------------------
Date: Tue, 03 Jul 2001 12:32:42 GMT
From: clintp@geeksalad.org (Clinton A. Pierce)
Subject: Re: no such file...
Message-Id: <KXi07.157300$DG1.26186972@news1.rdc1.mi.home.com>
[Posted and mailed]
In article <9hs28a$qg8$1@rex.ip-plus.net>,
"Sibylle Ramseier" <sibylle.ramseier@uniresear.ch> writes:
>
> The following error message occur. What's wrong with the path of the file ?
>
> open ../login/login.txt: No such file or directory at
> D:\User\bki\cgi-bin\bki3.pl line 6.
>
> The code is:
>
> #!/usr/bin/perl -w
> use strict;
> use CGI ':standard';
> use CGI::Carp 'fatalsToBrowser';
> my $datei = '../login/login.txt';
> open DATEI,">>$datei" or die "open $datei: $!";
Hrm. A CGI program. It's probably not running in the directory you
think it is. Try adding some diagnostics:
use Cwd;
print header();
print "I am in this directory: ", cwd;
Before the open() code and see where you are.
--
Clinton A. Pierce Teach Yourself Perl in 24 Hours *and*
clintp@geeksalad.org Perl Developer's Dictionary
"If you rush a Miracle Man, for details, see http://geeksalad.org
you get rotten Miracles." --Miracle Max, The Princess Bride
------------------------------
Date: Tue, 3 Jul 2001 08:58:50 +0000
From: gnari <gnarinn@hotmail.com>
Subject: Re: onMouseover in Perl?
Message-Id: <994150730.561641816981137.gnarinn@hotmail.com>
In article <3b4157c9@news.iprimus.com.au>,
Henry Bafner <dexrix@hotmail.com> wrote:
>I seem to be getting errors everytime a onMouseover is activated, and
>doesn't seem to work.
>
><a href=something.html onmouseover=window.status='Something Here';return
>true>Something Here</a>
>
>Can onmouseovers be used in perl?
>
This has nothing to do with perl, as can be seen by inserting your html
into a page by hane without perl. It still does not work.
Your html is bad.
gnari
------------------------------
Date: Tue, 03 Jul 2001 07:05:16 GMT
From: "Prarie Dawn" <prarie dawn @hotmail.com>
Subject: Pooling perl processes?
Message-Id: <994143915.775198@atlas.corp.au.home.com>
I'm trying to use Apache::ASP and I'm wondering about how processes are
handled on a low level.
If I had a module that performed a particular laborious task, and if that
module was called many times over many pages, then does Perl/Apache::ASP
keep that module in memory and pool requests to it? (in a way similar to
servlets?)
Worst case would be that the module is loaded fresh every time an asp page
includes it, and to not share that resource between simultaneous requests
(no pooling).
thanks
------------------------------
Date: Tue, 03 Jul 2001 12:55:32 GMT
From: mikee@kensho.eggtech.com (Mike Eggleston)
Subject: Re: ref($val) not returning anything?
Message-Id: <slrn9k3g64.c4b.mikee@kensho.eggtech.com>
On 2 Jul 2001 20:16:05 GMT, Damian Conway <damian@cs.monash.edu.au> wrote:
> mikee@kensho.eggtech.com (Mike Eggleston) writes:
>
>>I have some code that assigns a literal to a scalar.
>>On the scalar I use ref and test for SCALAR.
>>The function ref() does not return anything (as if its returning undef).
>>Any ideas?
>
> ref only returns "SCALAR" if $val holds a *reference* to a scalar.
> For non-reference values (i.e. strings and numbers) it returns false.
>
> So you probably want to test:
>
> if (!ref $val) { # not a reference, so must be a scalar value
>
> or perhaps:
>
> if (defined $val && !ref $val) {
>
>
>
> Damian
Thanks for pointing out my error.
Mike
------------------------------
Date: 3 Jul 2001 07:36:17 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Settings locale failed
Message-Id: <9hrslh$5ff$1@mamenchi.zrz.TU-Berlin.DE>
According to les ander <les_ander@yahoo.com>:
> anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) wrote in message
[...]
> > ...or, if you don't really care about the locale, just unset the $LANG
> > environment variable in your shell setup.
> >
> > Anno
> >
> I am using tcsh so i did setenv $LANG=""
No you didn't, that's a syntax error.
> but i still get this dreadfull message...
> can someone please help me fix it.
> thanks
unsetenv LANG
Anno
------------------------------
Date: Tue, 03 Jul 2001 12:31:59 GMT
From: "Thing" <noemail@noemail.com>
Subject: Re: SMTP, should be simple
Message-Id: <3Xi07.499$zg4.89984@newsread2.prod.itd.earthlink.net>
Thanks guys, it was a combo of all these errors. I am new, so i kept making
new mistakes after i corrected my other mistakes.
Dan
------------------------------
Date: Tue, 3 Jul 2001 12:04:55 +0000 (UTC)
From: steven.smolinski@sympatico.ca (Steven Smolinski)
Subject: Re: Using Array and while() loops
Message-Id: <9hscd7$3u2$1@taliesin.netcom.net.uk>
Uri Guttman <uri@sysarch.com> wrote:
> @fields = qw(
> server server_alias asset serial ser_make ser_model
> owner location dpu_grp primary_sa os os_ver ip_addr
> status purchase cs_link memory drives cpus ibm_bkup
> bdkup_sw ser_func cem cem_type primary_func maint_window
> support_level
> ) ;
>
> then a simple hash slice:
>
> @record{ @fields ) = split( /[\t\n]/ ) ;
^
|
|
@record{ @fields } = split( /[\t\n]/ );
Just playing typo police. Move along, nothing to see here...
Steve
--
Steven Smolinski => http://arbiter.ca/
------------------------------
Date: 3 Jul 2001 02:06:16 -0700
From: njcops2@hotmail.com (Mark)
Subject: web fetching
Message-Id: <a3430fbe.0107030106.57a3a6fd@posting.google.com>
Hi,
Does anyone know of any other web fetching CGI script other than
PageRipper
http://pageripper.cjb.net
If not, can you tell me if it's worth the 10 bucks or not?
I need a CGI script that will grab an external web page and then allow
me to use it on my own site. PageRipper was the only script I could
find.
Your help is appreciated.
Mark
------------------------------
Date: Tue, 03 Jul 2001 09:57:11 GMT
From: tony@svanstrom.com (Tony L. Svanstrom)
Subject: Re: web fetching
Message-Id: <1evyx50.36tghancik14N%tony@svanstrom.com>
Mark <njcops2@hotmail.com> wrote:
> Hi I'm looking for a good web fetching cgi script to use on my site.
> The only one I could find is PageRipper at http://pageripper.cjb.net/
>
> Does anyone know of any others or is this the only one? The one that
> they have does everything I need but it costs $10.00. Can someone take
> a look at the script above and tell me whether or not it's worth it?
It isn't; basically that guy's selling LWP::Simple, that comes with the
installation of Perl.
/Tony
--
the truth is dead, faith is gone, reality killed... ruled by the plastic
laws of modern life we're pushed towards the hell of personal doubt,
betrayal, hate, lust and murder... the now has become an illusion, a
paradise of a dead tomorrow... (c)2000-2001 tony@svanstrom.com
------------------------------
Date: Tue, 03 Jul 2001 13:41:32 +0200
From: Philip Newton <pne-news-20010703@newton.digitalspace.net>
Subject: Re: web fetching
Message-Id: <gob3kt4t42h700p5sska2g3q0271jui457@4ax.com>
On Tue, 03 Jul 2001 09:57:11 GMT, tony@svanstrom.com (Tony L. Svanstrom)
wrote:
> that guy's selling LWP::Simple, that comes with the installation of
> Perl.
Not quite true; it's not in the source distribution (and the current
pumpking has said he won't include it, though quite a few others have
been borged in). However, it's in the ActivePerl distribution AFAIK, so
if you're running ActivePerl (e.g. on Win32, Linux, or Solaris), you
already have it.
But even if you don't, LWP::Simple is just a CPAN mirror away, for free.
(Though you'd still have to write the script yourself.)
Cheers,
Philip
--
Philip Newton <nospam.newton@gmx.li>
Yes, that really is my address; no need to remove anything to reply.
If you're not part of the solution, you're part of the precipitate.
------------------------------
Date: Tue, 03 Jul 2001 10:27:20 GMT
From: "Joe Bloggs" <joe@bloggs.com>
Subject: Re: Where I can find BINMODE, any examples ???
Message-Id: <c6h07.108365$XL1.2380996@nlnews00.chello.com>
er..
open FILE,"some.file" || die "Erk: $!\n";
binmode FILE;
..that's it
"Jürgen Exner" <jurgenex@hotmail.com> wrote in message
news:3b415b52$1@news.microsoft.com...
> "Peter" <rig01@yahoo.com> wrote in message
> news:9lpijtcjrvsj1bg0691j4hjqemh6lanajf@4ax.com...
> > Where I can find BINMODE, any examples ???
>
> 'binmode' or 'BINMODE'?
> The word 'binmode' can be found in e.g this posting as well as in many
> scripts which need to read binary data on Windows platforms.
> Or are you looking for the implementation of binmode? Or for the
> documentation of binmode?
>
> Unfortunately your question is not very clear.
>
> jue
------------------------------
Date: Tue, 03 Jul 2001 13:09:56 +0200
From: Philip Newton <pne-news-20010703@newton.digitalspace.net>
Subject: Re: Where I can find BINMODE, any examples ???
Message-Id: <ou93kt0dicdq10ivk3b7tvk15i3bltlp71@4ax.com>
On Tue, 03 Jul 2001 10:27:20 GMT, "Joe Bloggs" <joe@bloggs.com>
top-posted full-quoted:
> er..
>
> open FILE,"some.file" || die "Erk: $!\n";
> binmode FILE;
>
> ..that's it
No, it's not, because you got the precedence wrong, so you're never
going to find out whether the open succeeded or not.
Cheers,
Philip
--
Philip Newton <nospam.newton@gmx.li>
Yes, that really is my address; no need to remove anything to reply.
If you're not part of the solution, you're part of the precipitate.
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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.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.
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 V10 Issue 1235
***************************************
