[12254] in Perl-Users-Digest
Perl-Users Digest, Issue: 5854 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jun 1 19:07:21 1999
Date: Tue, 1 Jun 99 16:00:17 -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 Tue, 1 Jun 1999 Volume: 8 Number: 5854
Today's topics:
Re: Anyone know what is this script line meaning ?? <cassell@mail.cor.epa.gov>
Re: bareface ratio <cassell@mail.cor.epa.gov>
Re: Better than Perl <dgris@moiraine.dimensional.com>
Re: Can I do this with an "if" statement? <bill@fccj.org>
Downloading files to users browser. <ihatzi@asus.net>
Re: Downloading files to users browser. <rootbeer@redcat.com>
End of May standings <sandym@landolittlepeople.com>
Re: formatting number output (Andrew Johnson)
Re: HELP!!!!!!!! <rootbeer@redcat.com>
Re: how to eliminate double counting for hit counter <rootbeer@redcat.com>
Re: Implementing a MSNBC-like Voting mechanism <rootbeer@redcat.com>
Re: manipulating text file... (Sam Holden)
Re: parsing HTML (Tad McClellan)
Re: parsing HTML <cassell@mail.cor.epa.gov>
parsing the ifconfig -a call on BSD... <portboy@home.com>
Re: Y2K infected Perl code <revjack@radix.net>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 01 Jun 1999 15:36:31 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Anyone know what is this script line meaning ??
Message-Id: <3754606F.CB681DF@mail.cor.epa.gov>
Jonathan Stowe wrote:
>
> On Mon, 31 May 1999 15:02:43 -0700 David Cassell wrote:
> > [courtesy cc to poster]
> >
> > Austin Ming wrote:
> >>
> >> [snip of other code]
> >> --> @files = grep { $_ !~ m/^\./} readdir(DIR);
> >>
> >> Anyone know what is this script line meaning ??
> >
> <snip>
> >
> > In regard to your question, it uses grep() to screen
> > out certain files from the list coming out of readdir().
> > Check out the grep() function in perlfunc for more
> > details. But the code drops every file and directory
> > in DIR which starts with a period. Which is usually
> > the wrong thing to do.
> >
>
> Aw. He (the original programmer that is) might be wanting to emulate
> the behaviour of 'ls' - Actually I posted a bit of code here the
> other day that did just this *deliberately*.
True. But I trust *your* code to do what you want.
The original author's use of
grep { $_ !~ m/^\./}
did not give me the warm fuzzy feeling that he/she had
grokked Perl. Your code certainly didn't insert $_ where
it was already the default.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Tue, 01 Jun 1999 15:42:05 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: bareface ratio
Message-Id: <375461BD.8F8D77E1@mail.cor.epa.gov>
Greg Bartels wrote:
>
> just an interesting phenomenon I've noticed
> on newsgroups in general.
>
> bareface ratio:
>
> the number of people who respond
> to tell you your information is wrong
>
> versus
>
> the number of people who respond
> to your requests for information
> on the same topic.
>
> this seems to be about 3 (or more) to 1,
> depending on the topic.
Greg, you're completely wrong on this point.
:-) Sorry, I couldn't resist adding anecdotal
verification to your assertion.
> so, if you have a question, and no one
> is responding, you can still get the
> answer, all you have to do is make something
> up first (bareface it), and the
> corrections will flood in.
Especially if you add one teeny, tiny error that is
more-or-less irrelevant to the original point of
the thread.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 01 Jun 1999 16:37:58 -0600
From: Daniel Grisinger <dgris@moiraine.dimensional.com>
Subject: Re: Better than Perl
Message-Id: <m3d7zfsg1l.fsf@moiraine.dimensional.com>
"Jim Davis" <hippie@net-alert.com> writes:
> D. J. Birchall wrote in message ...
> >I R A Aggie <fl_aggie@thepentagon.com> wrote:
> >> Well, if he would use more of a hook...like how this "unicon" is better,
> >> and why I should burn my perl books to pick this up...
> >And here I thought Unicons were just mythical beasts. :)
>
> Maybe he should be posting to comp.virgin.programmers instead?
I bet that's a high volume group. :-)
dgris
--
Daniel Grisinger dgris@moiraine.dimensional.com
perl -Mre=eval -e'$_=shift;;@[=split//;;$,=qq;\n;;;print
m;(.{$-}(?{$-++}));,q;;while$-<=@[;;' 'Just Another Perl Hacker'
------------------------------
Date: Tue, 01 Jun 1999 18:25:39 -0400
From: "Bill Jones" <bill@fccj.org>
Subject: Re: Can I do this with an "if" statement?
Message-Id: <37545d9e.0@usenet.fccj.cc.fl.us>
In article <x3ybtez536w.fsf@tigre.matrox.com>, Ala Qumsieh
<aqumsieh@matrox.com> wrote:
>
> lr@hpl.hp.com (Larry Rosler) writes:
>
>> if (1 <= $ans && $ans <= 60) {
>> ...
>>
>> No shorthand available for that.
>
> In cases like these, Python has a very useful, and intuitive
> feature. It allows you to do something like:
>
> if 1 <= ans <= 60:
> # bla bla
my $ans = ((shift) < 1) ? 0
: 1;
printf "%s",
(($ans) && $ans <= 60) ? "yes, \$ans GT 1 but LT or EQ 60"
: "no, \$ans <= ZERO or GT 60";
/^Humor$/
-Sneex- :]
______________________________________________________________________
Bill Jones Data Security Specialist http://www.fccj.org/cgi/mail?dss
Need to get started in Perl? See http://jacksonville.pm.org/Letter.cgi
------------------------------
Date: Tue, 1 Jun 1999 18:52:05 -0400
From: <ihatzi@asus.net>
Subject: Downloading files to users browser.
Message-Id: <7j1o4u$64l$1@autumn.news.rcn.net>
I need to write a PERL script that uploads a file to the users browser.
i.e.. The user clicks on a link, my script verifies users permissions, if
user is allowed access to the file my script should then initiate the upload
to the user. If the upload fails the script should make a not of this in a
log file.
How does the upload part work, and what tells the script that a failure
occurred? The rest I have working already. It is just
the upload part I am stuck on.
Thanks
Ion
------------------------------
Date: Tue, 1 Jun 1999 15:57:28 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Downloading files to users browser.
Message-Id: <Pine.GSO.4.02A.9906011556260.21956-100000@user2.teleport.com>
On Tue, 1 Jun 1999 ihatzi@asus.net wrote:
> I need to write a PERL script that uploads a file to the users browser.
It sounds as if you're not sure about the protocol which you'll be using
to communicate with the browser (or maybe a server). Perhaps you should
check the docs, FAQs, and newsgroups about browsers, servers, and their
protocols. Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 01 Jun 1999 16:28:28 -0600
From: Sandy Maple <sandym@landolittlepeople.com>
Subject: End of May standings
Message-Id: <37545E8C.5DDF912D@landolittlepeople.com>
This is a multi-part message in MIME format.
--------------B1B4205DF5E9EF31DF0D974E
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
--
// Sandy Maple
// First Resort Software
// sandym@landolittlepeople.com
// FYI - http://www.opensource.org/halloween.html
--------------B1B4205DF5E9EF31DF0D974E
Content-Type: text/html; charset=us-ascii;
name="Yahoo_31-May-1999.html"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename="Yahoo_31-May-1999.html"
<html>
<head><title>Yahoo! Finance - Investment Challenge Standings</title></head>
<body><center>
<nobr>
<a href="/?u"><img width=414 height=85 border=0 hspace=0 src="http://us.yimg.com/i/fi/invch4a.gif"
alt="Yahoo! Finance- Investment Challenge"></a>
</nobr>
<p>
<table border=0 cellpadding=2 cellspacing=0>
<tr bgcolor="#dcdcdc"><td align=center nowrap bgcolor="#99cc99"><font size="-1" face="Arial">Standings</font></td>
<td align=center>
|
</td>
<td align=center nowrap>
<a href="/t2?u"><font size="-1" face="Arial">Trade</font></a></td>
<td align=center>
|
</td>
<td align=center nowrap><font size="-1" face="Arial">Your Holdings</font></td>
<td align=center>
|
</td>
<td align=center nowrap>
<a href="/t5?u"><font size="-1" face="Arial">Orders</font></a></td>
<td align=center>
|
</td>
<td align=center nowrap>
<font size="-1" face="Arial">
<a href="http://biz.yahoo.com/x/r/h.html">Help & Rules</a>
</font>
</td>
<td align=center>
|
</td>
<td align=center nowrap>
<font size="-1" face="Arial">
<a href="http://messages.yahoo.com/bbs?action=topics&board=yahoo.61.13.8516446&type=r">Messages</a>
</font>
</td>
<td align=center>
|
</td>
<td align=center nowrap>
<font size="-1" face="Arial">
<a href="/">Yahoo! Finance Home</a>
</font>
</td>
</tr>
</table>
<p>
<table border=0 width="100%" cellpadding=4 cellspacing=0><tr>
<td bgcolor="#669966" align=left>
<strong><font face="arial, helvetica" size="+1">
Investment Challenge - Standings
</font></strong></td>
<td bgcolor="#669966" align=right><a href="/t1?u">Register</></td>
</tr></table>
<table border=0 width="100%" cellpadding=6 cellspacing=0><tr>
<td bgcolor="#dcdcdc" align=center>
<strong><font face="arial, helvetica" size="+1">
1998 Investment Challenge 5OK Winner - <a href="http://biz.yahoo.com/x/u/980930/keith1941.html">Keith Reisman</a> - Roseburg, OR
</font></strong></td>
</tr></table>
<p>
<table border=0 cellpadding=0 cellspacing=0>
<tr><td>
<table align=right bgcolor="#dcdcdc" border=1>
<tr><td>
<table cellpadding=0 cellspacing=0 width="100%">
<tr align=center><td colspan=3 bgcolor="#ffffff"><b>Your Standing</b></td></tr>
<tr align=center><td colspan=3>You rank <b>74684 of 132730</b></td></tr></table></td></tr>
<tr><td><table cellpadding=2 cellspacing=2 width="100%">
<tr align=center><td colspan=6 align=center bgcolor="#ffffff"><b>Top Standings Mon May 31</b></td></tr>
<tr>
<th align=right><small>Rank</small></th>
<th><small>User</small></th>
<th><small>Portfolio</small></th>
<th><small>History</small></th>
<th align=right><small>Holdings</small></th>
<th align=right><small>Return</small></th></tr>
<tr>
<td align=right><small>1</small></td>
<td><small>GinHee100</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/ginhee100.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=ginhee100/y">orders</a></small></td>
<td align=right><small>$320,043.94</small></td>
<td align=right><small>220.04%</small></td></tr>
<tr>
<td align=right><small>2</small></td>
<td><small>danchampn33</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/danchampn33.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=danchampn33/y">orders</a></small></td>
<td align=right><small>$315,706.75</small></td>
<td align=right><small>215.71%</small></td></tr>
<tr>
<td align=right><small>3</small></td>
<td><small>CWestling</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/cwestling.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=cwestling/y">orders</a></small></td>
<td align=right><small>$310,747.06</small></td>
<td align=right><small>210.75%</small></td></tr>
<tr>
<td align=right><small>4</small></td>
<td><small>mascherino</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/mascherino.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=mascherino/y">orders</a></small></td>
<td align=right><small>$296,856.44</small></td>
<td align=right><small>196.86%</small></td></tr>
<tr>
<td align=right><small>5</small></td>
<td><small>phillipe_c80</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/phillipe_c80.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=felo64/y">orders</a></small></td>
<td align=right><small>$296,618.25</small></td>
<td align=right><small>196.62%</small></td></tr>
<tr>
<td align=right><small>6</small></td>
<td><small>a_y2k_guy</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/a_y2k_guy.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=a_y2k_guy/y">orders</a></small></td>
<td align=right><small>$289,117.22</small></td>
<td align=right><small>189.12%</small></td></tr>
<tr>
<td align=right><small>7</small></td>
<td><small>jingtaic</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/jingtaic.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=jingtaic/y">orders</a></small></td>
<td align=right><small>$282,968.34</small></td>
<td align=right><small>182.97%</small></td></tr>
<tr>
<td align=right><small>8</small></td>
<td><small>mattster0417</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/mattster0417.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=mattster0417/y">orders</a></small></td>
<td align=right><small>$274,194.94</small></td>
<td align=right><small>174.19%</small></td></tr>
<tr>
<td align=right><small>9</small></td>
<td><small>HKUSP_40</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/hkusp_40.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=hkusp_40/y">orders</a></small></td>
<td align=right><small>$271,473.19</small></td>
<td align=right><small>171.47%</small></td></tr>
<tr>
<td align=right><small>10</small></td>
<td><small>jufreekei</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/jufreekei.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=jufreekei/y">orders</a></small></td>
<td align=right><small>$262,509.31</small></td>
<td align=right><small>162.51%</small></td></tr>
<tr>
<td align=right><small>11</small></td>
<td><small>dave_s_crawford</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/dave_s_crawford.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=dave_s_crawford/y">orders</a></small></td>
<td align=right><small>$254,797.72</small></td>
<td align=right><small>154.80%</small></td></tr>
<tr>
<td align=right><small>12</small></td>
<td><small>ncchan_98</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/ncchan_98.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=ncchan_98/y">orders</a></small></td>
<td align=right><small>$252,527.12</small></td>
<td align=right><small>152.53%</small></td></tr>
<tr>
<td align=right><small>13</small></td>
<td><small>lanny_38120</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/lanny_38120.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=lanny_38120/y">orders</a></small></td>
<td align=right><small>$251,104.19</small></td>
<td align=right><small>151.10%</small></td></tr>
<tr>
<td align=right><small>14</small></td>
<td><small>orangeman91</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/orangeman91.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=orangeman91/y">orders</a></small></td>
<td align=right><small>$245,900.75</small></td>
<td align=right><small>145.90%</small></td></tr>
<tr>
<td align=right><small>15</small></td>
<td><small>geo7272</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/geo7272.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=geo7272/y">orders</a></small></td>
<td align=right><small>$245,353.81</small></td>
<td align=right><small>145.35%</small></td></tr>
<tr>
<td align=right><small>16</small></td>
<td><small>d_ser76</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/d_ser76.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=d_ser76/y">orders</a></small></td>
<td align=right><small>$245,068.75</small></td>
<td align=right><small>145.07%</small></td></tr>
<tr>
<td align=right><small>17</small></td>
<td><small>rybercan</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/rybercan.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=rybercan/y">orders</a></small></td>
<td align=right><small>$244,945.19</small></td>
<td align=right><small>144.95%</small></td></tr>
<tr>
<td align=right><small>18</small></td>
<td><small>Homer45_54</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/homer45_54.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=homer45_54/y">orders</a></small></td>
<td align=right><small>$244,698.38</small></td>
<td align=right><small>144.70%</small></td></tr>
<tr>
<td align=right><small>19</small></td>
<td><small>nicatt1_2</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/nicatt1_2.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=nicatt1_2/y">orders</a></small></td>
<td align=right><small>$243,905.66</small></td>
<td align=right><small>143.91%</small></td></tr>
<tr>
<td align=right><small>20</small></td>
<td><small>Ngenus_1</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/ngenus_1.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=ngenus_1/y">orders</a></small></td>
<td align=right><small>$242,741.75</small></td>
<td align=right><small>142.74%</small></td></tr><tr align=center><td colspan=6 align=center bgcolor="#ffffff"><b>Bottom Standings </b></td></tr>
<tr>
<td align=right><small>132730</small></td>
<td><small>dancerwithlife</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/dancerwithlife.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=dancerwithlife/y">orders</a></small></td>
<td align=right><small>$0.00</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132730</small></td>
<td><small>limtechnick</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/limtechnick.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=limtechnick/y">orders</a></small></td>
<td align=right><small>$0.00</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132730</small></td>
<td><small>sarajevski_papak1</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/sarajevski_papak1.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=sarajevski_papak1/y">orders</a></small></td>
<td align=right><small>$0.00</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132730</small></td>
<td><small>Sharon_stocks</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/sharon_stocks.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=sharon_stocks/y">orders</a></small></td>
<td align=right><small>$0.00</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132726</small></td>
<td><small>da_junkman</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/da_junkman.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=da_junkman/y">orders</a></small></td>
<td align=right><small>$0.12</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132726</small></td>
<td><small>samsak</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/samsak.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=samsak/y">orders</a></small></td>
<td align=right><small>$0.12</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132724</small></td>
<td><small>pochacco_burrito</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/pochacco_burrito.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=pochacco_burrito/y">orders</a></small></td>
<td align=right><small>$0.41</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132723</small></td>
<td><small>docholiday_51</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/docholiday_51.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=docholiday_51/y">orders</a></small></td>
<td align=right><small>$0.47</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132722</small></td>
<td><small>badbad22</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/badbad22.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=badbad22/y">orders</a></small></td>
<td align=right><small>$0.50</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132721</small></td>
<td><small>jphelml</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/jphelml.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=jphelml/y">orders</a></small></td>
<td align=right><small>$0.75</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132720</small></td>
<td><small>probstein</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/probstein.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=probstein/y">orders</a></small></td>
<td align=right><small>$0.78</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132719</small></td>
<td><small>CharlieB05</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/charlieb05.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=charlieb05/y">orders</a></small></td>
<td align=right><small>$0.88</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132719</small></td>
<td><small>GERB72</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/gerb72.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=gerb72/y">orders</a></small></td>
<td align=right><small>$0.88</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132717</small></td>
<td><small>EvAce99</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/evace99.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=evace99/y">orders</a></small></td>
<td align=right><small>$0.94</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132716</small></td>
<td><small>t_teselle</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/t_teselle.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=t_teselle/y">orders</a></small></td>
<td align=right><small>$1.12</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132716</small></td>
<td><small>tancorp1</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/tancorp1.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=tancorp1/y">orders</a></small></td>
<td align=right><small>$1.12</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132714</small></td>
<td><small>francisgau</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/francisgau.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=francisgau/y">orders</a></small></td>
<td align=right><small>$1.19</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132713</small></td>
<td><small>AKDeadmeat</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/akdeadmeat.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=akdeadmeat/y">orders</a></small></td>
<td align=right><small>$1.25</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132713</small></td>
<td><small>mbapicks</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/mbapicks.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=mbapicks/y">orders</a></small></td>
<td align=right><small>$1.25</small></td>
<td align=right><small>-100.00%</small></td></tr>
<tr>
<td align=right><small>132711</small></td>
<td><small>danzmail</small></td>
<td><small><a href="http://biz.yahoo.com/x/u/990531/danzmail.html">holdings</a></small></td>
<td><small><a href="http://quote.yahoo.com/t5?y=danzmail/y">orders</a></small></td>
<td align=right><small>$1.31</small></td>
<td align=right><small>-100.00%</small></td></tr></table>
</td></tr></table>
<p>
<a href="/t1?u">Sign up now</a> for the current Investment Challenge
and win a <b>$5000</b> gift certificate for online shopping.
<ul>
<li>Check out the Winners for the
<a href="http://biz.yahoo.com/x/w/0199.html">January, 1999</a> and
the year <a href="http://biz.yahoo.com/x/w/1998.html">1998</a>
contests
</ul>
<hr>
<!-- market watch and top 20 standings follow -->
<a href="http://cbs.marketwatch.com/news/newsroom.htx"><img align=left src="http://us.yimg.com/i/fi/eye.gif" alt="CBS MarketWatch" border=0 width=50 height=77></a>
<!--webbot bot="PurpleText" PREVIEW="Headline=Data topple bonds, stocks" --><p><strong><font face="Arial" size="2"><em>Sturdy NAPM report</em></font><font size="5" face="Arial"><br>
Data topple bonds, stocks
</font></strong></p>
<div align="right">
<em>By <a href="mailto:kmarder@cms.dbc.com">Kevin N. Marder</a>, CBS
MarketWatch<br>
<font size="2">Last Update:Tue Jun 1 13:36:09 1999<br></font></em>
</div><p>NEW YORK (CBS.MW) -- Participants continued to factor a near-term Federal Reserve
interest rate hike into bond and stock prices Tuesday in the wake of a sturdy report from
the manufacturing sector.</p>
<p>"There are increased fears that the next move [on rates by the Federal Reserve]
will be up, and sooner rather than later," said <strong>Michael Lyons</strong>,
senior trader at Morgan Stanley Dean Witter.</p>
<p>The <a href="/q?s=^dji&d=t">Dow
Jones Industrial Average</a> advanced 36.52 points, or 0.3 percent, to 10,596.26. The
barometer had traded down as much as 150.59 points intraday.</p>
<p>Tuesday's advance was just the fourth in the last 12 sessions for the Dow. Despite its
gain, other major averages lost altitude.</p>
<p>The <a href="/q?s=^ixic&d=t">Nasdaq
Composite</a> fell 57.93 points, or 2.3 percent, to 2,412.59 to stand about 10 percent
below its April 27 record intraday high. The Standard
& Poor's 500 Index sank 0.6 percent.</p>
<p>The National Association of Purchasing Management said its May manufacturing index
increased to 55.2 from April's 52.8, well above the 53.7 expected by most economists
surveyed by CBS.MarketWatch.com. A reading above 50 correlates with an expanding
manufacturing sector, while a sub-50 number implies a contracting manufacturing economy.</p>
<p>The report's inflation component, the prices-paid subindex, increased to 52.2 from
49.9, the first reading above 50 since December 1997. The Federal Reserve and bond market
consider the report to be one of the best forward-looking indicators of U.S. industrial
activity. See
full story.</p>
<p>"The NAPM report is telling us that the one laggard sector in the economy,
manufacturing, is finally getting as strong as the rest of the economy," said <strong>M.
Cary Leahey</strong>, managing director and U.S. economist at Primark Decision Economics.</p>
<div align="right">
</div><p>In the bond
market,<strong> </strong>the 30-year
Treasury was knifed to the tune of 1 9/32 points, a major drop. The yield
(TYX) backed up to 5.930 percent from Friday's 5.823 percent. See Bond Report.</p>
<p>Leahey noted that the Federal Reserve specifically referenced the term "core
CPI" in its message explaining why it recently tilted its bias toward tighter credit.
For this reason, he doesn't expect the central bank to make a move just yet. The core CPI
is the consumer price index, less the volatile food and energy items.</p>
<p>"While the bond market will continue to price in a Fed tightening going forward,
particularly if the May employment number on Friday is strong, the market won't consider
it a done deal until the May CPI release on June 16."</p>
<p>Other observers believe the market's message has been blatant.</p>
<p>"I would think a Federal Reserve rate hike has been factored into the market for
quite some time," said <strong>Hugh Johnson</strong>, chief investment strategist at
First Albany Corp.</p>
<p>"Short-term interest rates have reflected a move by the Federal Reserve from 4.75
percent to 5 percent [on the federal funds rate] for almost three weeks," said
Johnson. The funds rate, the Fed's key monetary policy lever, is what banks charge each
other for overnight loans.</p>
<p>Small-cap
shares gave less ground than their larger counterparts, while technology
stocks were the worst-performing sector.</p>
<p>Among narrow groups, the brokers were
hit hard, in part due to plans unveiled by Merrill Lynch to enter the online trading
business. The group is also among the most sensitive to interest rate movements.</p>
<div align="right">
</div><p>Elsewhere, the liquidation in Internet issues gathered steam as
the day progressed. It's been nearly three weeks since the Goldman Sachs
Internet Index (GIN) put together two back-to-back winning sessions.</p>
<p>"The tech sector has not scored a new high as the Dow Jones Industrials did two
weeks, a bad negative nonconfirmation," said <strong>Ralph Bloch</strong>, chief
market analyst at Raymond James & Associates Inc.</p>
<p>"We know that without tech leadership, market rallies usually are doomed," he
added.</p>
<p>Meanwhile, investors sifted through a stack of merger announcements.</p>
<div align="right">
<!--webbot bot="HTMLMarkup" u-src="http://webfrontcbs.dbc.com/news/images/headline_bug_token.gif" StartSpan -->$INCLUDE(/newsroom/hdlnbug3.htm)<!--webbot BOT="HTMLMarkup" endspan -->
</div><p><strong>E-Trade</strong> <strong>Group</strong> [s: egrp] is buying Internet bank
<strong>Telebanc Financial</strong> [s: tbfc] in a stock deal valued at $1.8 billion.
E-Trade stock declined 5 3/16 to 39 5/16, while Telebanc bolted 8 to 74 1/2. See
full story.</p>
<p><strong>MCI WorldCom</strong> [s: wcom] said it will buy paging services provider <strong>SkyTel
Communications </strong>[s: skyt] in a $1.3 billion stock deal that values SkyTel shares
at $21.24 apiece. Tuesday, SkyTel's stock had risen as much as 16 percent on news of
MCI's registration of the www.skytelworldcom.com
Web site address, first revealed to <strong>CBS.MarketWatch.com</strong> by Infonautics' www.CompanySleuth.com [s: info]. MCI later denied
its registration of the domain address was an "indication of any official company
intent." SkyTel stock closed down 3/16 to 20 1/8 and MCI shares declined 2 1/8 to 84
1/4. See
full story.</p>
<p><strong>AmSouth Bancorporation </strong>[s: aso] is purchasing <strong>First American</strong>
[s: fam] for about $6.3 billion, or $53.09 a share, in stock. First American shareholders
will receive 1.871 shares of AmSouth common stock for each First American common share.
Stock of AmSouth fell 3 15/16 to 24 7/16, while First shares added 2 13/16 to 43 5/8. See
full story.</p>
<p><strong>Liberty Media</strong> <strong>Group</strong> [s: lmg.a], a unit of <strong>AT&T</strong>
[s: t], said it's buying wireless stakeholder <strong>Associated Group</strong> [s: agrpa]
for about $3 billion in stock, including debt. Liberty stock fell 3/16 to 66 1/4 and
Associated shares surrendered 2 3/4 to 62 1/4. See
full story.<font size="+0"></p>
</font><p>Specialty chemicals concerns <strong>Crompton & Knowles </strong>[s: cnk]
and <strong>Witco</strong> [s: wit] will combine in a stock swap valued at about $1
billion. Crompton shares tacked on 1 1/4 to 19 5/8 and Witco stock appreciated 15/16 to 18
7/16.</p>
<p>New York Stock Exchange losers topped winners by 8 to 7.</p>
<p>On the Big Board floor, turnover swelled 5 percent to 682 million shares.</p>
<p>Declining issues beat risers by 22 to 17 in the Nasdaq Stock Market.</p>
<p>The Russell
2000 Index of small-capitalization stocks sank 0.3 percent.</p>
<p><strong>Intel </strong>[s: intc] dimmed 3 3/8 to 50 3/4. Widely-followed BancBoston
Robertson Stephens analyst Dan Niles said he's ramping down his estimate of second-quarter
net by 2 cents a share. Niles had previously expected 53 cents.</p>
<div align="right">
</div><p><strong>Amazon.com </strong>[s: amzn] retreated 12 15/16 to 105 13/16 on the
heels of a negative cover story in Barron's entitled "Amazon.bomb."</p>
<p><strong>Merrill Lynch</strong> [s: mer] lost 8 3/4 to 75 1/4. In July the broker will
introduce a new account that will allow customers unlimited trading in most equities,
mutual funds, and bonds for a minimum annual fee of $1,500. And beginning in December,
Merrill will offer online trading for $29.95 a transaction. See
full story.</p>
<p>Other brokers
faded, especially those with a sizable electronic exposure. <strong>Charles Schwab </strong>gave
back 6 to 99 1/2, <strong>Ameritrade </strong>9 15/16 to 79 3/4, <strong>National Discount
Broker</strong> 4 5/16 to 42 3/16, <strong>Morgan Stanley Dean Witter </strong>4 3/4 to 91
3/4, <strong>DLJdirect </strong>4 1/4 to 38 3/4, and <strong>Donaldson, Lufkin &
Jenrette</strong> 5 3/16 to 61 3/4.</p>
<p><strong>Hewlett-Packard </strong>[s: hwp] sagged 4 3/16 to 90 1/8 and <strong>Sun
Microsystems </strong>[s: sunw] subtracted 3 3/4 to 56 after Banc of America Securities
analyst Kurt King slimmed his opinion of the computer manufacturers to "hold"
from "buy." King's survey of corporate and public sector buyers indicated
spending on computer hardware will taper in fourth-quarter 1999 and first-quarter 2000. He
sees a recovery, however, "once Y2K is behind us." </p>
<p><strong>Complete Business Solutions </strong>[s: cbsi] swooned 7 7/8, or 33 percent, to
16 3/8. SG Cowen analyst Moshe Katri cut his rating to "buy" from "strong
buy", slashed his price objective from $50 to $30, and trimmed 1999 and 2000 earnings
estimates for the information technology services provider. Katri cited a potential
slowdown in overseas revenue as one factor behind his revised outlook.</p>
<p><strong>Rite Aid </strong>[s: rad] gained 1 11/16 to 26 11/16. The drugstore operator
restated results for its 1997, 1998, and 1999 fiscal years. For the year ended Feb. 28
1997, net before extraordinary items was upwardly revised by a penny a share, while 1998
earnings were lowered by 4 cents. It trimmed 1999 net income by a nickel. The company
didn't adjust estimates for 2000. </p>
<p>See latest <font face="Times New Roman" size="3">commodity
prices and currency
rates. </font><br>
<br>
<em><a href="mailto:kmarder@cms.dbc.com">Kevin N. Marder</a> is Markets Editor for CBS
MarketWatch.</em>
</td></tr></table>
<table border=0 width="100%" cellpadding=2 cellspacing=2><tr><td
bgcolor="#669966"><br></td></tr></table>
<form method=get action="/q"><nobr><input type=text size=25 name=s><input type=submit value="Get Quotes"><select name=d><option value=v1 selected>Basic
<option value=v2>DayWatch
<option value=v3>Performance
<option value=v4>Fundamentals
<option value=v6>Research
<option value=t>Detailed
<option value=b>Chart
<option value=r>Research
</select>
<a href="/l">symbol lookup</a></nobr></form>
<table border=0 cellpadding=0 cellspacing=0><tr><td align=center>
<script language="javascript"><!--
var remote = null;
function rs(n,u,w,h) {
remote = window.open(u, n, 'width=' + w + ',height=' + h +', resizable=yes,scrollbars=yes');
if (remote != null) {
if (remote.opener == null)
remote.opener = self;
window.name = 'jpmwin';
remote.location.href = u;
}
}
//-->
</script>
<b>Portfolios: </b>
<nobr><a href="/p?v&k=pf_1">P</a> -</nobr>
<nobr><a href="/p?v&k=pf_2">Q</a> -</nobr>
<nobr><a href="/p?v&k=pf_3">S</a> -</nobr>
<nobr><a href="/p?v&k=pf_7">J</a> -</nobr>
<nobr><a href="/p?v&k=pf_15">R</a> -</nobr>
<nobr><a href="/p?v&k=pf_16">B</a> -</nobr>
<nobr><a href="/p?v&k=cpf_a199905">Investment_Challenge_May</a> -</nobr>
<nobr>[<a href="http://my.yahoo.com/news/portfolio_summary.html?v">My Yahoo View</a> |</nobr>
<nobr><a href="http://my.yahoo.com/desktop/3d/stock.html">3D</a> |</nobr>
<nobr><a href="javascript:rs('_blank','/portf/jt.html',450,360)">Java Portfolio Manager</a> |</nobr>
<nobr><a href="http://edit.my.yahoo.com/config/set_quotes?.done=http://finance.yahoo.com/p&.list_portf=1&.src=quote&.portfolio">Create New Portfolio</a> |</nobr>
<nobr><a href="http://edit.my.yahoo.com/config/login?logout=1&.src=quote&.done=http://finance.yahoo.com/?u">Sign Out</a>]</nobr>
</td></tr></table>
<hr><i>
<a href="http://biz.yahoo.com/x/r/h.html">Questions or Comments?</a>
<br>Copyright © 1999 Yahoo! All Rights Reserved.<br>See our
<a href="http://www.yahoo.com/docs/info/gen_disclaimer.html">Important
Disclaimers and Legal Information</a>.
</small>
<br>Copyright © 1998
<a href="http://cbs.marketwatch.com/news/newsroom.htx">MarketWatch.com</a>,
LLC.<br><small>This material is for personal use only. Republication and
redissemination, including posting to news groups, is expressly prohibited
without the prior written
<a href="http://cbs.marketwatch.com/news/feedback.htx">permission</a>
of MarketWatch.com LLC.</small>
</i>
</center></body></html>
--------------B1B4205DF5E9EF31DF0D974E--
------------------------------
Date: Tue, 01 Jun 1999 22:20:43 GMT
From: andrew-johnson@home.com (Andrew Johnson)
Subject: Re: formatting number output
Message-Id: <%0Z43.37885$tE.294240@news2.rdc1.on.home.com>
In article <slrn7l8isl.u3c.James@linux.home>,
James Stevenson <James@linux.home> wrote:
! Hi
!
! so where are the FAQS??
!
! thanks
if you have perl installed they are right there on your
system: try either:
man perlfaq4
perldoc perlfaq4
to get you the one I pointed out earlier...as you are unfamiliar
with this included documentation I suggest you also try:
perldoc perldoc
perldoc perl
perldoc perltoc
perldoc perlfaq
for starters
The FAQ's and other documentation can also be found online if
you poke around at www.perl.com
And lastly, you might want to check out the following article:
<http://www.perlmonth.com/articles/perldoc/rtfm.html>
which will introduce you to Perl's copious and valuable
documentation
--
Andrew L. Johnson http://members.home.com/andrew-johnson/
"Where the hell are my fries, kid?"
-Tom Christiansen, on comp.lang.perl.misc
------------------------------
Date: Tue, 1 Jun 1999 15:33:31 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: HELP!!!!!!!!
Message-Id: <Pine.GSO.4.02A.9906011532390.21956-100000@user2.teleport.com>
On Tue, 1 Jun 1999, John Espinosa wrote:
> Subject: HELP!!!!!!!!
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> I am looking for a cgi script which makes a clientside console to
> modify a web page.If someone has a core script or knows where I might
> find one I would really appreciate. I haven't worked with perl too
> much and I don't have time to write up a complete script from scratch.
If you're wishing merely to _find_ (as opposed to write) programs,
this newsgroup may not be the best resource for you. There are many
freeware and shareware archives which you can find by searching Yahoo
or a similar service. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 1 Jun 1999 15:05:31 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: how to eliminate double counting for hit counter
Message-Id: <Pine.GSO.4.02A.9906011500450.21956-100000@user2.teleport.com>
On Tue, 1 Jun 1999, Gareth Rees wrote:
> As others have explained, you can't identify individuals. But you can
> get a count of the number of different IP addresses that have accessed
> your page
Of course, if five million AOL users all looked at your page today, your
counter probably went up by about a dozen - one for each caching proxy at
AOL. But unless the counter in question provides something more meaningful
than one in the FAQ _and_ has some feature relevant to Perl, let's stop
this discussion here.
Just to be safe:
"Hitler believed that hit counters were reliable."
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 1 Jun 1999 15:29:13 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Implementing a MSNBC-like Voting mechanism
Message-Id: <Pine.GSO.4.02A.9906011511480.21956-100000@user2.teleport.com>
On Tue, 1 Jun 1999, Lewis Lin wrote:
> What I really want to do is creating a voting mechanism using Perl.
> A good example is http://www.msnbc.com, where they allow readers to
> vote on an article on a scale of 1-10 at the bottom of each story.
> When a user tries to vote again, a pleasant message says, "Sorry
> you've already voted on this story."
Yes, that message is a real frustration. Once I've voted, my wife tries to
use the web, but she can't vote on the same story. It's a rip. Then my
girlfriend can't vote on that story either, and she gets bummed. Same
thing happens with my other two wives, my mistress, my three concubines,
and our seventy-three kids. It's totally unfair. Well, most of the younger
ones don't get much web-surfing time, what with us all sharing the one
WebTV machine, but you know how it is.
Anyway, when you make your voting system, be sure to allow 81 votes from
my IP address, so we can each get a turn. But make sure that Jenny doesn't
vote in Glenn's place, okay? He really can't stand it when she steals his
vote.
I gotta go, one of the wives wants me to mow the lawn so that she can surf
the web for a while. Dang, I'm supposed to have two minutes left before
it's her turn. This is so unfair. What a rip. I'm gonna get a second
WebTV, I swear, as soon as I can save something up from paying off what I
owe to my second ex. Hey, when I do that, the wife will be able to vote on
those MS-NBC stories. Cool.
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 1 Jun 1999 22:58:16 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: manipulating text file...
Message-Id: <slrn7l8pc7.boj.sholden@pgrad.cs.usyd.edu.au>
On Tue, 1 Jun 1999 12:44:09 -0700, Larry Rosler <lr@hpl.hp.com> wrote:
>[Posted and a courtesy copy mailed.]
>
>In article <3753A3BC.4F887AB8@home.com> on Tue, 01 Jun 1999 17:08:32
>GMT, Mitch <portboy@home.com> says...
>> Okay, I am able to easily remove and edit fields in a text file,
>> however, I still have a quick question. I have a config file that looks
>> something like;
>>
><SNIP data reproduced below>
>>
>> What I would like to be able to do is, if a user enters an input of "foo
>> schnicken", I'd like to able to put that right after "foo haha" or the
>> last seen "foo" entry. How can I do this?
>
>My minimal-line solution:
>
>
>#!usr/local/bin/perl -w
>use strict;
>
>my $input = 'foo schnicken';
>
>for (my $was_a_foo; <DATA>; print) {
> print "$input\n" if
> !(my $is_a_foo = substr($_, 0, 4) eq 'foo ') && $was_a_foo;
> $was_a_foo = $is_a_foo;
>}
I don't know about minimal line...
#!usr/local/bin/perl -w0777
use strict;
my $input = 'foo schnicken';
my $data=<DATA>;
$data=~s/^(foo .*\n)(?!foo )/$1$input/m;
print $data;
has one less line... (and only works if all the foo entries are
together in the file). Then again Larry's solution adds the
entry twice in this case. I could lose a line by using a for
loop and moving the print up into the increment part I guess.
That would allow $/ to be set without using the -0 option
and thus destroying the STDIN reading for example.
Of course I would guess that Larry's is much faster.
As always though I guessed wrong (or my bnchamrk is broken which
is probably more likely). Mine stays in the C code for longer I
guess.
Mine slurps in the file and thus uses more memory as well.
Anyway here is the benchmark so Larry can see what is wrong with
it...
#!usr/local/bin/perl -w
use strict;
use Benchmark;
my @data = <DATA>;
open(NULL,">/dev/null") || die "can't open /dev/null: $!";
timethese(100000, {larry => sub { larry(@data) },
sholden => sub { sholden(@data)},
});
sub larry {
for (my $was_a_foo; $_ = shift; print NULL $_) {
print NULL "ffo schnicken\n" if
!(my $is_a_foo = substr($_, 0, 4) eq 'foo ') && $was_a_foo;
$was_a_foo = $is_a_foo;
}
}
sub sholden
{
my $data=join '', @_;
$data=~s/^(foo .*\n)(?!foo )/$1foo schnicken/m;
print NULL $data;
}
__END__
blah
blah blah
blah blah
blah
foo this you freak
foo me
foo bar
foo haha
blah
blah
blah
blah
Benchmark: timing 100000 iterations of larry, sholden...
larry: 13 wallclock secs (13.00 usr + 0.03 sys = 13.03 CPU)
sholden: 9 wallclock secs ( 8.48 usr + 0.04 sys = 8.52 CPU)
--
Sam
I explicitly give people the freedom not to use Perl, just as God gives
people the freedom to go to the devil if they so choose.
--Larry Wall
------------------------------
Date: Tue, 1 Jun 1999 12:54:24 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: parsing HTML
Message-Id: <0831j7.r95.ln@magna.metronet.com>
Steve (stevenh@erols.com) wrote:
: I am new to Perl, and I'm working on a program to parse fairly simple HTML
: files and convert their content to plain text files for use by another system.
: I saw several
: references to a package called HTML::Parser.
: What is this?
It is a Perl module (a library).
: Is it freeware/shareware?
It is freely available.
: How do I get and use it?
get it: http://www.perl.com/CPAN
use it: after you have installed it: perldoc HTML::Parser
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Tue, 01 Jun 1999 15:52:06 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
To: Steve <stevenh@erols.com>
Subject: Re: parsing HTML
Message-Id: <37546416.16ADEB75@mail.cor.epa.gov>
[courtesy cc sent to poster]
Steve wrote:
>
> I am new to Perl, and I'm working on a program to parse fairly simple HTML
> files and convert their content to plain text files for use by another system.
> I posted an earlier question regarding the use of the .* characters in a
> substitution command. While reading more info, however, I saw several
> references to a package called HTML::Parser.
>
> What is this? Is it freeware/shareware? How do I get and use it? Is there a
> URL where I can find out more about this? It sounds like something that has
> already been written to do a lot of what I am trying to do.
Tad already replied with a useful post. But before you go to
CPAN, as he suggested, check whether you have it already. You
used WinVN to post this, so I'm assuming you want this for a
win32 box. Look in the HTML tree that was installed with your
copy of ActiveState Perl. See if under the modules header you
have and HTML heading. Now look under that for 'Parser'. If so,
you're golden. If not, then use PPM (there's a usage page for
ppm in the HTML docs as well) to install HTML::Parser from
ActiveState's website. It's easier than going to CPAN, and
it will install its docs into the HTML tree for you.
HTH,
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Tue, 01 Jun 1999 22:23:13 GMT
From: Mitch <portboy@home.com>
Subject: parsing the ifconfig -a call on BSD...
Message-Id: <3753ED7E.E7AE4ED6@home.com>
Okay, let's assume I have two network interfaces on a give box: exp0
and exp1. I'd like to parse the output returned from ifconfig -a and
give the interface name (exp0 and exp1) and also return their mac
address.
Can someone help me with this?
thanks,
Mitch
------------------------------
Date: 1 Jun 1999 22:07:31 GMT
From: Pinehurst Staten <revjack@radix.net>
Subject: Re: Y2K infected Perl code
Message-Id: <7j1lj3$cs1$1@news1.Radix.Net>
Keywords: Hexapodia as the key insight
Jonathan Stowe explains it all:
:On 1 Jun 1999 10:04:43 GMT Malcolm Ray wrote:
:>
:> For example: what
:> proportion of beginning CGI programmers start by copying and modifying
:> existing code? How many of these do so because they've tried and
:> failed to find online tutorial documentation pitched at their level?
:> If such a learner found that the first script they studied contained a
:> comment pointing to good introductory documentation, plus a suggestion
:> that they copy this comment into any code that they produce, could
:> this become a meme which would raise the standard?
:>
:Strangely someone brought this up here (clpmisc) a few weeks ago - go search
:at AltaVista for "Un-Webify" (or whatever the comment in the form parsing
:code in wwwboard.pl ) and you'll come up with hundreds of different
:scripts all with the self same piece of code. I hate to think whatever
:other pieces of truly bad code have transmitted themselves in this manner.
Every "Un-Webify" code chunk I've seen has been followed by another
popular chunk that passes web form variables directly into a sendmail pipe
without Taint checking or any other attempt at security.
open (MAIL, "|$mailprog $FORM{recipient}") || die "Can't open $mailprog!\n";
How many things can you find wrong with the line above?
--
/~\ gamma impartial juicy Frances clever gabbro compleat about spea
C oo aura redpoll mortal belong expedition deterring Oedipal gazelle
_( ^) 1 , 0 0 0 , 0 0 0 m o n k e y s c a n ' t b e w r o n g
/___~\ http://www.radix.net/~revjack/mnj revjack@radix.net
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5854
**************************************
