[13921] in Perl-Users-Digest
No subject found in mail header
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Nov 10 17:48:02 1999
Date: Mon, 8 Nov 1999 13:13:19 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <942095599-v9-i1317@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 8 Nov 1999 Volume: 9 Number: 1317
Today's topics:
Source code search engine <anaressi@rz.uni-leipzig.de>
Re: Source code search engine <cassell@mail.cor.epa.gov>
Re: Special Problem <gellyfish@gellyfish.com>
Spliting lines from a file into varables <pmcjannett@mpx.com.au>
Re: Spliting lines from a file into varables (Abigail)
Re: Spliting lines from a file into varables <wyzelli@yahoo.com>
Re: Spliting lines from a file into varables <lr@hpl.hp.com>
splitting, without losing the thing you split with (Eric Smith)
Re: splitting, without losing the thing you split with <gellyfish@gellyfish.com>
Re: splitting, without losing the thing you split with (Bart Lateur)
Re: SQL 6.5 and Apache rmore1@my-deja.com
Re: SQL 6.5 and Apache hugh_williams@my-deja.com
Re: SQL 6.5 and Apache <calummaclean@xtra.co.nz>
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: Suggestion: Putting URLs in POD-files by U<..> or (Kragen Sitaker)
Table <vrii@tpo.fi>
Re: Table <vrii@tpo.fi>
Re: Table <rick.delaney@home.com>
Re: tar file <rootbeer@redcat.com>
Re: tar file <cassell@mail.cor.epa.gov>
Re: tar file <gellyfish@gellyfish.com>
The end (Was Re: Problem with perl and MSIE5) <gellyfish@gellyfish.com>
Re: The end (Was Re: Problem with perl and MSIE5) (Abigail)
Re: trouble with hash <cramirez@gte.net>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 05 Nov 1999 15:09:34 +0100
From: Alexandre Naressi <anaressi@rz.uni-leipzig.de>
Subject: Source code search engine
Message-Id: <3822E51E.9542ECEA@rz.uni-leipzig.de>
Hi,
Here is a free source code search engine for Java, Javascript, C/C++ and
Perl :
DevCorner - Free source code for all
http://altern.org/devcorner
Open-source software authors are invited to submit their site to our
database.
See you soon. :-)
Alex.
___________________________________________
Alexandre NARESSI - Software Engineer
___________________________________________
------------------------------
Date: Fri, 05 Nov 1999 14:31:42 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Source code search engine
Message-Id: <38235ACE.2007F5E9@mail.cor.epa.gov>
[other NGs removed]
Alexandre Naressi wrote:
>
> Hi,
>
> Here is a free source code search engine for Java, Javascript, C/C++ and
> Perl :
This is only a search engine in the sense that toy cars have
an engine. It's a website with links. And they're not good
links. Matt Wright's name shows up near the top on the Perl
page, and you know what that means.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 4 Nov 1999 20:40:32 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Special Problem
Message-Id: <7vsr00$7gr$1@gellyfish.btinternet.com>
On Thu, 04 Nov 1999 20:02:27 +0100 Frank de Bot wrote:
> I'll try to explain this as good as possible.
>
> I've a perl script ( test.pl ) with some HTML anchors. is there a way to
> create a HTTP_REFERER that isn't indentical to the one the browser wants
> to give.
>
> So I click on a link from this page: http://127.0.0.1/test.pl and I'll
> 'land' at otherfile.pl . If I ask for the referer at otherfile.pl I want
> to return to something other.
>
Well its tough. If you had read the appropriate RFC that describes HTTP
then you would have known. If you had asked in a group that discusses
HTTP matters then you might have got an explanation why what you are
asking is impossible.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Mon, 8 Nov 1999 18:34:41 +1100
From: "Paul McJannett" <pmcjannett@mpx.com.au>
Subject: Spliting lines from a file into varables
Message-Id: <805u35$2vr$1@news1.mpx.com.au>
Can someone help. I am having trouble doing a split on a read in line. The
data is like this: mcjapa;mcjannett paul;0700;0211;0500;0311. I have been
using the split command to try to get them into the variables, like this
($userid, $last, $first, $on, $date, $off, $on)=split('/;/', $line);. This
gives me the whole line of data into the first variable. Does anyone know
what I am doing wrong ?.
Thanks,
Paul McJannett
------------------------------
Date: 8 Nov 1999 01:40:39 -0600
From: abigail@delanet.com (Abigail)
Subject: Re: Spliting lines from a file into varables
Message-Id: <slrn82cvqj.lh6.abigail@alexandra.delanet.com>
Paul McJannett (pmcjannett@mpx.com.au) wrote on MMCCLX September MCMXCIII
in <URL:news:805u35$2vr$1@news1.mpx.com.au>:
,, Can someone help. I am having trouble doing a split on a read in line. The
,, data is like this: mcjapa;mcjannett paul;0700;0211;0500;0311. I have been
,, using the split command to try to get them into the variables, like this
,, ($userid, $last, $first, $on, $date, $off, $on)=split('/;/', $line);. This
,, gives me the whole line of data into the first variable. Does anyone know
,, what I am doing wrong ?.
Yeah, you don't have slashes in your data, so /;/ is never going to match.
You probably want: split /;/ => $line;
or split ';' => $line;
Abigail
--
sub _'_{$_'_=~s/$a/$_/}map{$$_=$Z++}Y,a..z,A..X;*{($_::_=sprintf+q=%X==>"$A$Y".
"$b$r$T$u")=~s~0~O~g;map+_::_,U=>T=>L=>$Z;$_::_}=*_;sub _{print+/.*::(.*)/s}
*_'_=*{chr($b*$e)};*__=*{chr(1<<$e)};
_::_(r(e(k(c(a(H(__(l(r(e(P(__(r(e(h(t(o(n(a(__(t(us(J())))))))))))))))))))))))
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Mon, 8 Nov 1999 17:17:50 +0930
From: "Wyzelli" <wyzelli@yahoo.com>
Subject: Re: Spliting lines from a file into varables
Message-Id: <IevV3.2$QI3.386@vic.nntp.telstra.net>
Paul McJannett <pmcjannett@mpx.com.au> wrote in message
news:805u35$2vr$1@news1.mpx.com.au...
> Can someone help. I am having trouble doing a split on a read in line. The
> data is like this: mcjapa;mcjannett paul;0700;0211;0500;0311. I have been
> using the split command to try to get them into the variables, like this
> ($userid, $last, $first, $on, $date, $off, $on)=split('/;/', $line);. This
> gives me the whole line of data into the first variable. Does anyone know
> what I am doing wrong ?.
>
> Thanks,
> Paul McJannett
>
Lose the '' around the split. ie
($userid, $last, $first, $on, $date, $off, $on)=split (/;/,$line);
Also the first and last name will not be separated by this so you may need
to change to :
$line ='mcjapa;mcjannett paul;0700;0211;0500;0311';
($userid, $full, $on, $date, $off, $on) = split(/;/, $line);
($last, $first) = split(/ /, $full);
print "$userid $last $first $on $date $off $on\n";
Wyzelli
------------------------------
Date: Sun, 7 Nov 1999 23:46:03 -0800
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Spliting lines from a file into varables
Message-Id: <MPG.12901f915000def298a1c2@nntp.hpl.hp.com>
In article <805u35$2vr$1@news1.mpx.com.au> on Mon, 8 Nov 1999 18:34:41
+1100, Paul McJannett <pmcjannett@mpx.com.au> says...
> Can someone help. I am having trouble doing a split on a read in line. The
> data is like this: mcjapa;mcjannett paul;0700;0211;0500;0311. I have been
> using the split command to try to get them into the variables, like this
> ($userid, $last, $first, $on, $date, $off, $on)=split('/;/', $line);. This
> gives me the whole line of data into the first variable. Does anyone know
> what I am doing wrong ?.
The first argument to split() is a regex, not a string that seems to
contain a regex.
split(/;/, $line)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 8 Nov 1999 10:37:26 GMT
From: eric@fruitcom.com (Eric Smith)
Subject: splitting, without losing the thing you split with
Message-Id: <slrn82d9v6.npu.eric@plum.fruitcom.com>
I want to specify the object to split with.
say /^\.\w\w\s/
viz. a full-stop at the beginning of the line followed by two word characters,
followed by a space.
Now I would like the elements of the array resulting from this split to
_include_ the \w\w, I do not waht to lose these. On the other hand I do
not just want to match any full-stop at the start of a line, only those
succeeded by \w\w.
Is there a way?
--
Eric Smith
eric@fruitcom.com
www.fruitcom.com
Secret hacker rule #11: hackers read manuals.
------------------------------
Date: 8 Nov 1999 10:52:19 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: splitting, without losing the thing you split with
Message-Id: <3826ab63_1@newsread3.dircon.co.uk>
Eric Smith <eric@fruitcom.com> wrote:
> I want to specify the object to split with.
> say /^\.\w\w\s/
> viz. a full-stop at the beginning of the line followed by two word characters,
> followed by a space.
>
> Now I would like the elements of the array resulting from this split to
> _include_ the \w\w, I do not waht to lose these. On the other hand I do
> not just want to match any full-stop at the start of a line, only those
> succeeded by \w\w.
>
> Is there a way?
>
If you look at the perlfunc entry for split you will see what it does
when you include parentheses in the split pattern ....
/J\
--
"The chef's salty balls have dropped" - Christopher Price, BBC NEWS 24
------------------------------
Date: Mon, 08 Nov 1999 13:39:41 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: splitting, without losing the thing you split with
Message-Id: <3828d0e6.748353@news.skynet.be>
Eric Smith wrote:
>I want to specify the object to split with.
>say /^\.\w\w\s/
>viz. a full-stop at the beginning of the line followed by two word characters,
>followed by a space.
>
>Now I would like the elements of the array resulting from this split to
>_include_ the \w\w, I do not waht to lose these. On the other hand I do
>not just want to match any full-stop at the start of a line, only those
>succeeded by \w\w.
>
>Is there a way?
There's at least two. One is, as Jonathan Stowe wrote, include
parentheses, but that would insert the "thing you split with) as items
interspersed between the normal items.
Way two is to use lookahead or lookbehind. That is: the splitting item
must match, but the actual matched width is still zero.
$_ = "abc.de fgh.ij klm";
$, = "#";
print split /(?<=\.\w\w)\s+/;
-->
abc.de#fgh.ij#klm
I think that is what you want.
--
Bart.
------------------------------
Date: Fri, 05 Nov 1999 18:44:54 GMT
From: rmore1@my-deja.com
Subject: Re: SQL 6.5 and Apache
Message-Id: <7vv8j5$2kq$1@nnrp1.deja.com>
In article <7cBU3.2428$J55.138346@monger.newsread.com>,
scott@aravis.softbase.com (Scott McMahan) wrote:
> ¤@¤ė (any@any.com) wrote:
> > Machine 1 - Linux, Apache Web Server, Openlink Driver, Perl 5.05.
> > Machine 2 - NT, MSSQL 6.5, ODBC, Openlink Server
> > DB details: dbname=test, user=sa, passwd =,
DSN=Test SQL
>
>
> > DBI:ODBC:??? or sth else??
>
Use DBD::Sybase
http://www.mbay.net/~mpeppler/
or
Use DBD::FreeTDS
http://www.freetds.org/
--
=============================
Richard More
http://www.richmore.com/
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Sat, 06 Nov 1999 21:39:34 GMT
From: hugh_williams@my-deja.com
Subject: Re: SQL 6.5 and Apache
Message-Id: <80276n$1lb$1@nnrp1.deja.com>
Perl DBD::ODBC
The way to make it work is this: 1/ download iODBC 2.5 from
<<http://www.openlinksw.com/iodbc/>>. I think you've done this already
but
want
to be sure 2/ download & install DBI - nothing ODBC-related is
required at
this point 3/ download & install DBD::ODBC. At this point you edit
Makefile.PL (for DBD::ODBC) and about 44% through the file, amend my
$libs="odbc" into my $libs="iodbc" Now you can perl Makefile.PL &&
make
&&
make install, as long as libiodbc.so is readily locatable (ldconfig,
LD_LIBRARY_PATH, etc).
4/ export the required DBD_{DSN,USER,PASSWD} environment variables
5/ edit ~/.odbc.ini to make sure the MSSQL DSN is set up properly
6/ export a UDBCINI environment variable - in your case, you can
point
this
at ~/.odbc.ini also.
7/ check that openlink's odbctest works, with a connect string like
DSN=MSSQL;UID=sa;PWD=
8/ try "make test" from the DBD::ODBC installation top-level
directory.
It
should at least connect at test 2.
HTH!
Also checkout the following URL for more info:
http://forteviot.symbolstone.org/cgi/dbi/moduledump?module=DBD::ODBC
In article <7vu9bp$ff2$1@news.hk.linkage.net>,
"¤@¤ė" <any@any.com> wrote:
> Machine 1 - Linux, Apache Web Server, Openlink Driver, Perl 5.05.
> Machine 2 - NT, MSSQL 6.5, ODBC, Openlink Server
> DB details: dbname=test, user=sa, passwd =, DSN=Test
SQL
>
> If I use perl to connect two machine(machine get data from machine
2), how
> should I config the DSN??
>
> ie.$dbh=DBI->connect($DSN, $user, $passwd)
>
> what is this $DSN??
>
> DBI:ODBC:??? or sth else??
>
>
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Mon, 8 Nov 1999 15:50:25 +1300
From: "Calum MacLean" <calummaclean@xtra.co.nz>
Subject: Re: SQL 6.5 and Apache
Message-Id: <805dk5$ak8pj$1@titan.xtra.co.nz>
Scott McMahan <scott@aravis.softbase.com wrote:
> > Machine 1 - Linux, Apache Web Server, Openlink Driver, Perl 5.05.
> > Machine 2 - NT, MSSQL 6.5, ODBC, Openlink Server
> > DB details: dbname=test, user=sa, passwd =, DSN=Test SQL
> I do not think this is simply a matter of configuring the DSN. DBI is not
> magic. There is no ODBC implementation for Linux or UNIX that I know of,
> for free, to buy, or to steal.
The Openlink software mentioned is an ODBC implementation for UNIX. Assuming
that is all setup correctly
$dsn = "DBI:ODBC:test" (and assuming the ODBC DBD driver is installed).
There are other ways to setup this connection between Linux/DBI and NT but
if you want to give your money to Openlink there isn't much of a trick to
it.
-----------------------
Calum MacLean
------------------------------
Date: 8 Nov 1999 15:20:24 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <806pno$2os$1@info2.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 01 Nov 1999 15:24:02 GMT and ending at
08 Nov 1999 07:54:22 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 1999 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
Totals
======
Posters: 463
Articles: 1729 (1020 with cutlined signatures)
Threads: 399
Volume generated: 3191.3 kb
- headers: 1397.6 kb (27,037 lines)
- bodies: 1611.7 kb (49,157 lines)
- original: 1030.8 kb (34,048 lines)
- signatures: 180.4 kb (3,852 lines)
Original Content Rating: 0.640
Averages
========
Posts per poster: 3.7
median: 1 post
mode: 1 post - 277 posters
s: 11.4 posts
Posts per thread: 4.3
median: 3 posts
mode: 1 post - 97 threads
s: 6.0 posts
Message size: 1890.0 bytes
- header: 827.7 bytes (15.6 lines)
- body: 954.5 bytes (28.4 lines)
- original: 610.5 bytes (19.7 lines)
- signature: 106.8 bytes (2.2 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
134 281.3 (103.4/150.5/ 81.6) kragen@dnaco.net (Kragen Sitaker)
93 159.5 ( 72.8/ 75.7/ 37.5) Jonathan Stowe <gellyfish@gellyfish.com>
92 243.2 (107.2/ 95.5/ 91.1) abigail@delanet.com
92 161.0 ( 73.6/ 76.7/ 38.2) David Cassell <cassell@mail.cor.epa.gov>
83 141.4 ( 55.0/ 77.0/ 37.9) Larry Rosler <lr@hpl.hp.com>
74 125.6 ( 71.6/ 45.5/ 29.8) Tom Phoenix <rootbeer@redcat.com>
48 109.0 ( 44.7/ 49.0/ 26.0) Uri Guttman <uri@sysarch.com>
32 76.5 ( 28.5/ 41.4/ 26.2) lee.lindley@bigfoot.com
27 40.0 ( 23.3/ 16.5/ 11.1) bart.lateur@skynet.be (Bart Lateur)
27 43.3 ( 16.5/ 26.8/ 14.0) Ala Qumsieh <aqumsieh@matrox.com>
These posters accounted for 40.6% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
281.3 (103.4/150.5/ 81.6) 134 kragen@dnaco.net (Kragen Sitaker)
243.2 (107.2/ 95.5/ 91.1) 92 abigail@delanet.com
161.0 ( 73.6/ 76.7/ 38.2) 92 David Cassell <cassell@mail.cor.epa.gov>
159.5 ( 72.8/ 75.7/ 37.5) 93 Jonathan Stowe <gellyfish@gellyfish.com>
141.4 ( 55.0/ 77.0/ 37.9) 83 Larry Rosler <lr@hpl.hp.com>
125.6 ( 71.6/ 45.5/ 29.8) 74 Tom Phoenix <rootbeer@redcat.com>
109.0 ( 44.7/ 49.0/ 26.0) 48 Uri Guttman <uri@sysarch.com>
76.5 ( 28.5/ 41.4/ 26.2) 32 lee.lindley@bigfoot.com
48.9 ( 17.7/ 26.6/ 16.0) 23 mgjv@comdyn.com.au
45.4 ( 16.1/ 24.2/ 15.1) 25 cberry@cinenet.net (Craig Berry)
These posters accounted for 43.6% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.973 ( 2.0 / 2.1) 5 pudge@pobox.com (Chris Nandor)
0.954 ( 91.1 / 95.5) 92 abigail@delanet.com
0.909 ( 4.4 / 4.8) 7 Vincent Murphy <vincent.murphy@cybertrust.gte.com>
0.904 ( 2.6 / 2.8) 5 "Peter L. Berghold" <peter@berghold.net>
0.828 ( 14.2 / 17.2) 7 "Alan J. Flavell" <flavell@mail.cern.ch>
0.762 ( 2.4 / 3.1) 5 Shon Stephens <shon@mad.scientist.com>
0.739 ( 5.2 / 7.1) 7 A.Flavell@physics.gla.ac.uk
0.720 ( 3.3 / 4.6) 8 michel.dalle@usa.net (Michel Dalle)
0.710 ( 6.4 / 9.0) 9 Marcel Grunauer <marcel.grunauer@lovely.net>
0.681 ( 6.8 / 10.0) 6 jand@activestate.com (Jan Dubois)
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.432 ( 1.6 / 3.7) 6 Rick Delaney <rick.delaney@home.com>
0.418 ( 0.7 / 1.7) 5 Mike Salter <msalter@bestweb.net>
0.408 ( 1.8 / 4.4) 5 lee.lindley@viasystems.com
0.383 ( 1.5 / 3.8) 7 catfood@apk.net (Mark W. Schumann)
0.368 ( 2.7 / 7.2) 6 anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
0.366 ( 0.5 / 1.4) 5 Scratchie <AgitatorsBand@yahoo.com>
0.349 ( 1.7 / 5.0) 5 sholden@cs.usyd.edu.au
0.329 ( 5.7 / 17.3) 20 mbudash@wcws.com (Michael Budash)
0.299 ( 1.4 / 4.8) 5 "Laval Desbiens" <goya@saglac.qc.ca>
0.289 ( 3.0 / 10.4) 8 raju_k@iname.com
53 posters (11%) had at least five posts.
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
56 localtime object y2k compliant?
46 how sort an array?
36 It is always like this here?
30 perl and commonsense
30 Perl and commonsense part 2
25 How can I set reg. expresion to anchor at the end of a string?
25 Another 'or'? was [perl double-split]
21 Year 2000 date problem
20 comparing text with words
19 -w
These threads accounted for 17.8% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
121.7 ( 49.3/ 66.2/ 34.7) 56 localtime object y2k compliant?
98.6 ( 38.0/ 55.0/ 34.2) 46 how sort an array?
98.0 ( 36.3/ 55.8/ 38.2) 36 It is always like this here?
82.8 ( 23.8/ 54.6/ 34.8) 30 perl and commonsense
78.8 ( 23.5/ 51.0/ 31.6) 30 Perl and commonsense part 2
64.5 ( 25.4/ 34.7/ 28.7) 25 Another 'or'? was [perl double-split]
53.7 ( 24.1/ 24.9/ 18.4) 25 How can I set reg. expresion to anchor at the end of a string?
38.6 ( 22.5/ 12.6/ 8.2) 20 comparing text with words
37.8 ( 19.5/ 14.1/ 8.6) 18 string number conversion
35.8 ( 6.3/ 29.0/ 17.1) 8 Can this be made faster?
These threads accounted for 22.3% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.952 ( 15.3/ 16.1) 5 Quoting Strategies and the Jeopardy Game
0.833 ( 15.3/ 18.3) 9 CGI FAQ discussion, was Re: Problem with perl and MSIE5
0.828 ( 28.7/ 34.7) 25 Another 'or'? was [perl double-split]
0.815 ( 2.1/ 2.5) 6 Perl Newbie
0.795 ( 11.9/ 15.0) 6 Card shuffling
0.788 ( 1.4/ 1.8) 5 How can I store/print a variable containing a DISPLAY IP address?
0.777 ( 5.7/ 7.3) 6 Don't we have POINTERS on Perl?
0.772 ( 13.7/ 17.7) 6 Why doesn't this work?
0.757 ( 5.8/ 7.6) 9 proposed "??" operator causing ambiguous syntax
0.755 ( 3.0/ 4.0) 5 Running perl on NT
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.473 ( 2.5 / 5.4) 8 What makes the web go?
0.471 ( 4.4 / 9.3) 13 HELP:Elements in an array have a space in front of them
0.469 ( 0.8 / 1.7) 5 howto download a GIF from a URI?
0.428 ( 2.6 / 6.0) 9 How do U parse from the end of the line?
0.424 ( 3.1 / 7.3) 6 Library files and how to use them -- insert as an FAQ?
0.417 ( 2.1 / 5.0) 8 Perl script required - Willing to pay
0.398 ( 1.4 / 3.5) 5 Need routine to find banned or "Bad" words
0.384 ( 4.5 / 11.6) 19 -w
0.374 ( 4.7 / 12.5) 12 password question
0.298 ( 2.4 / 8.0) 8 Help for CGI
108 threads (27%) had at least five posts.
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
52 comp.lang.perl.modules
39 comp.software.year-2000
16 comp.lang.java.programmer
16 alt.perl
13 comp.lang.cobol
13 alt.2600
7 comp.lang.perl
6 comp.lang.java
6 comp.infosystems.www.authoring.html
4 comp.unix.solaris
Top 10 Crossposters
===================
Articles Address
-------- -------
19 kragen@dnaco.net (Kragen Sitaker)
15 Jonathan Stowe <gellyfish@gellyfish.com>
9 dolphinride@usa.net
6 David Cassell <cassell@mail.cor.epa.gov>
6 "Wai Wu" <waikwu@redconnect.net>
6 Uri Guttman <uri@sysarch.com>
5 "H.A." <Hanny@Yours.Com>
5 Rev . Meowatilla Al' Rashad <meowatilla@usenet-performance-art.org>
5 Larry Rosler <lr@hpl.hp.com>
5 nik@removethis.sinesurf.co.nz (Nik Smišr Warrensson)
------------------------------
Date: Sun, 07 Nov 1999 02:33:54 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: Suggestion: Putting URLs in POD-files by U<..> or L<...> mechanism
Message-Id: <my5V3.49992$23.1898857@typ11.nn.bcandid.com>
In article <3821A4E5.64F0EF2@unixsnedkeren.dk>,
Thorbjoern Ravn Andersen <tmp0000@unixsnedkeren.dk> wrote:
>The U<text|link> syntax should be exactly the same as the L<> syntax,
>but with a little different treatment, i.e. allowing a URL list at the
>end or so depending on the translator.
>
>Tom, would you accept a patch to pod2html?
tchrist finally stopped reading this newsgroup last month.
(Unfortunately, he hasn't stopped posting.)
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Tue Nov 02 1999
6 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Fri, 05 Nov 1999 10:32:45 +0200
From: Veli-Pekka Riihikoski <vrii@tpo.fi>
Subject: Table
Message-Id: <3822962D.87C135BD@tpo.fi>
Hi
My problem is like this.
example
@array = ('string', 'string2long', string3');
then i want output look like this:
+---------+------+
| string | string3 |
+---------+------+
| string2long |
+---------+
If the is module to do this please let me know.
And if you could send example how to use it.
thanks. i appreciate if you could help me
even a little :).
--------------------
Veli-Pekka Riihikoski
vrii@tpo.fi
------------------------------
Date: Fri, 05 Nov 1999 15:06:18 +0200
From: Veli-Pekka Riihikoski <vrii@tpo.fi>
Subject: Re: Table
Message-Id: <3822D64A.CC730C73@tpo.fi>
Damn.
The table in previous message isnt what i ment :P.
You probably guess what i am trying to say in there.
> --------------------
> Veli-Pekka Riihikoski
> vrii@tpo.fi
------------------------------
Date: Sat, 06 Nov 1999 05:01:02 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: Re: Table
Message-Id: <3823B624.786F3BF4@home.com>
[posted & mailed]
Veli-Pekka Riihikoski wrote:
>
> Damn.
>
> The table in previous message isnt what i ment :P.
> You probably guess what i am trying to say in there.
Too late, I already wrote you a solution based on your previous spec.
;-)
@array = ('string', 'string2long', 'string3');
format STDOUT =
+---------+------+
| @<<<<<<<<<<< | @<<<<<<< |
$array[0], $array[2]
+---------+------+
| @<<<<<<<<<< |
$array[1]
+---------+
.
write;
If there is a module to do what you want then it should be on CPAN. Try
http://search.cpan.org/
Possibly Text::Format? (I've never used it).
--
Rick Delaney
rick.delaney@home.com
------------------------------
Date: Fri, 5 Nov 1999 12:28:27 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: tar file
Message-Id: <Pine.GSO.4.10.9911051227000.29670-100000@user2.teleport.com>
On Fri, 5 Nov 1999, mecks wrote:
> Can anyone help to tell me if there is a command has similar
> function as tar in csh
You mean, like tar in bash, or tar in ash, or tar in /bin/sh, or tar
in....
> I do not want to use the following command
> system(" tar xvf /dev/nrtape ????") || die "Something";
Good idea, since it'll die in the event that the tar command succeeds. :-)
> is there any modulus to do that?
If there's a module which does what you want, it should be listed in
the module list on CPAN. If you don't find one to your liking, you're
welcome and encouraged to submit one! :-) Hope this helps!
http://www.cpan.org/
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Fri, 05 Nov 1999 14:17:49 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: tar file
Message-Id: <3823578D.A3C85A04@mail.cor.epa.gov>
mecks wrote:
>
> Hi,
> Can anyone help to tell me if there is a command has similar
> function as tar in csh
>
> I do not want to use the following command
> system(" tar xvf /dev/nrtape ????") || die "Something";
Ummm, that won't work like you think. Check out the semantics
of system() in the docs.
> Did syswrite perform the similar task? Or is there any modulus to do
> that?
syswrite() won't do all that. A module? Yes. If the search
facilities of the CPAN module aren't helping you enough, you
can also check out http://search.cpan.org/
[hint: Archive::Tar sounds fairly close to what you want, but
may not be exactly like the tar on your system]
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 5 Nov 1999 20:22:03 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: tar file
Message-Id: <7vve9b$8im$1@gellyfish.btinternet.com>
On Fri, 05 Nov 1999 20:08:37 +0800 mecks wrote:
> Hi,
> Can anyone help to tell me if there is a command has similar
> function as tar in csh
>
csh doesnt have any function called 'tar' but yes there is such a unix program.
> I do not want to use the following command
> system(" tar xvf /dev/nrtape ????") || die "Something";
>
I'm not quite sure why you dont want to do that ...
> Did syswrite perform the similar task? Or is there any modulus to do
> that?
What do you mean by that ?
Look on CPAN <http://www.cpan.org> for Archive::Tar
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 5 Nov 1999 16:48:17 GMT
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: The end (Was Re: Problem with perl and MSIE5)
Message-Id: <38230a51_2@newsread3.dircon.co.uk>
Mohammad Akram Ali Mehkri <mehkri@yahoo.com> wrote:
> From: Mohammad Akram Ali Mehkri <mehkri@yahoo.com>
> Newsgroups: comp.lang.perl.misc
> Subject: Re: Problem with perl and MSIE5
> Date: Fri, 5 Nov 1999 05:20:40 -0800 (PST)
> Organization: Deja.com - Before you buy
> Lines: 49
> Message-ID: <19991105132040.13403.rocketmail@web215.mail.yahoo.com>
> NNTP-Posting-Host: postnews.dejanews.com
> Mime-Version: 1.0
> Content-Type: text/plain
> Content-Transfer-Encoding: 7bit
> To: "comp.lang.perl.misc@list.deja.com" <comp.lang.perl.misc@list.deja.com>
> X-DejaID: _9S5uGRHcNJJu9yWPSP28OvBIX+GbW7A/?=
> Path: newsread3.dircon.co.uk!news.dircon.co.uk!peer1.news.dircon.net!btnet-peer!btnet!newsfeed.mathworks.com!newsswitch.lcs.mit.edu!netnews.com!newspeer.monmouth.com!news-feeds.jump.net!nntp2.deja.com!nnrp1.deja.com!not-for-mail
> Xref: newsread3.dircon.co.uk comp.lang.perl.misc:241403
>
> Check the http header that u r writing.
> It should either be
> print "Content-type:text/html\015\012\015\012";
> print "Content-type:text/html\n\r\n\r";
Examine these headers - I would take that to mean that Deja News are now
offering a mail to news gateway - be afraid .....
Also no references header ...
/J\
--
"Buzz Aldrin was the second man to walk on the moon and the first to
fill his pants" - Violet Berlin, The Big Bang
------------------------------
Date: 5 Nov 1999 11:06:59 -0600
From: abigail@delanet.com (Abigail)
Subject: Re: The end (Was Re: Problem with perl and MSIE5)
Message-Id: <slrn8263sj.dk.abigail@alexandra.delanet.com>
Jonathan Stowe (gellyfish@gellyfish.com) wrote on MMCCLVII September
MCMXCIII in <URL:news:38230a51_2@newsread3.dircon.co.uk>:
.. Mohammad Akram Ali Mehkri <mehkri@yahoo.com> wrote:
.. > Organization: Deja.com - Before you buy
.. > NNTP-Posting-Host: postnews.dejanews.com
.. > X-DejaID: _9S5uGRHcNJJu9yWPSP28OvBIX+GbW7A/?=
.. >
..
.. Examine these headers - I would take that to mean that Deja News are now
.. offering a mail to news gateway - be afraid .....
They keep changing their headers, which makes it harder to kill them.
Abigail
--
%0=map{reverse+chop,$_}ABC,ACB,BAC,BCA,CAB,CBA;$_=shift().AC;1while+s/(\d+)((.)
(.))/($0=$1-1)?"$0$3$0{$2}1$2$0$0{$2}$4":"$3 => $4\n"/xeg;print#Towers of Hanoi
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Sun, 07 Nov 1999 11:29:04 GMT
From: Carlos Ramirez <cramirez@gte.net>
Subject: Re: trouble with hash
Message-Id: <382561DA.55DC0056@gte.net>
Try:
@new_answer = @{ $answer{$question} };
Since your key values are array references you have to deference them.
-Carlos
"Mark P." wrote:
> Hi, can someone point me in the right direction here? faq, doc,
> whatever.
> I'm using a hash and trying to populate a new array from it so I can
> use those array values in my script.
>
> The hash;
> %answer = (
> '1'=>['false','true','don\'t
> know','pic1.gif','pic2.gif','test answer'],
> '2'=>['false','true','don\'t
> know','pic1.gif','pic2.gif','test answer'],
> '3'=>['false','true','don\'t
> know','pic1.gif','pic2.gif','test answer'], blah,blah... I'm just
> testing so everythings the same.
>
> the bad code.
>
> @new_answer = $answer{$question_number}; # obviouly this aint workin.
> I'd bore you with my other attempts but i don't want you to fall
> asleep.
>
> I've tried a whole bunch of things actually. I've searched
> Dejanews, reviewed the faq, and checked some references via
> reference.perl.com on hash's. I think a lot of this is zoomin right
> through the old brain socket. I've had a few beers on this problem
> which probably hasn't helped.<G>
> I just need to be pointed to something that I can read and
> hopefully understand. As always I appreciate any help.
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 1317
**************************************
