[22147] in Perl-Users-Digest
Perl-Users Digest, Issue: 4368 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 8 18:06:33 2003
Date: Wed, 8 Jan 2003 15:05:09 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 8 Jan 2003 Volume: 10 Number: 4368
Today's topics:
alternating formats on STDOUT <fm_duendeBASURA@yahoo.com>
Re: alternating formats on STDOUT <usenet@dwall.fastmail.fm>
Re: DBI::do sometimes returns 0 when it should not (mys ctcgag@hotmail.com
Re: Dealing with split() and quotes <mdudley@execonn.com>
Re: Dealing with split() and quotes (Tad McClellan)
Existence of an executable of unknown location (Liz)
Re: Existence of an executable of unknown location <mpapec@yahoo.com>
Re: Existence of an executable of unknown location <rgarciasuarez@free.fr>
Re: Existence of an executable of unknown location (Tad McClellan)
Re: finding files older than a given date (Anno Siegel)
Re: How do you use cgi.pm to parse multiple records of (Entfred)
How to install mod locally? LIB=./foo fails <irving_kimura@lycos.com>
Re: Nested sort (Lee)
Re: No such file or directory error (Jay Tilton)
Re: Recreating directory hierarchy <bik.mido@tiscalinet.it>
reload not terminating process <mdudley@execonn.com>
Re: reload not terminating process (Tad McClellan)
Simple Filter <tambaa.Xspam@yahoo.com>
strict & warnings did NOT trigger? <penny1482@attbi.com>
Re: strict & warnings did NOT trigger? <uri@stemsystems.com>
Re: strict & warnings did NOT trigger? (Jay Tilton)
The Best and The Easiest Perl Module to Draw 2-D Line C (Jay Chan)
Re: The Best and The Easiest Perl Module to Draw 2-D Li <murat.uenalan@gmx.de>
Re: These are discouraging stats to Perlistas & Pythoni (Perl B. Best, FTR)
Re: These are discouraging stats to Perlistas & Pythoni <>
Re: tracing the HTTP (Jay Tilton)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 08 Jan 2003 19:54:32 GMT
From: monkeys paw <fm_duendeBASURA@yahoo.com>
Subject: alternating formats on STDOUT
Message-Id: <Yl%S9.612934$P31.230769@rwcrnsc53>
I've got two formats i would like to alternately use
on STDOUT:
format EVENT =
@<<<<<<<<< @<<<<<<<<<<<<<
$title $location
.
format ACTION =
@<<<<<< @<<<<<<<<
$time $title
.
# Can't do this part - something like it
open (EVENT, '>' . STDOUT);
open (ACTION, '>' . STDOUT);
#Something like this:
# This can be accomplished with select() ?? maybe?
foreach (@events) {
$title = $_->{title};
$location = $_->{location};
write(event); # Goes to stdout
foreach $action (@{ $_ -> {actions} } ) {
$title = $_->{title};
$time = $_->{time};
write(action); # Go to stdout also
}
}
------------------------------
Date: Wed, 08 Jan 2003 20:30:09 -0000
From: "David K. Wall" <usenet@dwall.fastmail.fm>
Subject: Re: alternating formats on STDOUT
Message-Id: <Xns92FD9DB2E867dkwwashere@216.168.3.30>
monkeys paw <fm_duendeBASURA@yahoo.com> wrote on 08 Jan 2003:
> I've got two formats i would like to alternately use
> on STDOUT:
I'd just use printf(). IMHO, formats are a PITA to use and rarely if
ever necessary.
--
David K. Wall - usenet@dwall.fastmail.fm
"Oook."
------------------------------
Date: 08 Jan 2003 20:36:54 GMT
From: ctcgag@hotmail.com
Subject: Re: DBI::do sometimes returns 0 when it should not (mysql)?
Message-Id: <20030108153654.669$vK@newsreader.com>
uffesterner@spamhole.com (Rex Gustavus Adolphus) wrote:
> Hi
>
> I wonder if anyone else sometimes get 0 returned from a
> DBI::do-statement that actually affects a certain number of rows.
>
> The specific database I'm accessing is mysql.
>
> For instance if the table "test_table" contains 4000 records
> and I do:
> $rows_affected = $db->do("delete from test_table");
>
> then $rows_affected is 0 and there is no records left in the table.
This is a documented special case. Mysql implements a unrestricted
delete statement about the way oracle implements "truncate table":
by rebuilding the empty table and indices from scratch rather than
deleting each row. If you want to (slowly) delete all the rows and get an
accurate count back, do a delete from test_table where 1>0. (I don't know
why the decided to report 0, rather than reporting an accurate count
using the same fast method they do for select count(*) from test_table).
> I also seen this happen for update-statements,
> that the $rows_affected is 0 although I know records has been updated.
If you update a field by assigning it the value it already had,
mysql detects this and doesn't actually update the row, and doesn't count
it as being updated. There's a connection flag for the C API to return
number of rows matched rather than number actually changed, but I don't
if there is such a flag for the Perl API or not.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service New Rate! $9.95/Month 50GB
------------------------------
Date: Wed, 08 Jan 2003 14:57:56 -0500
From: Marshall Dudley <mdudley@execonn.com>
Subject: Re: Dealing with split() and quotes
Message-Id: <3E1C82C4.66F9D40E@execonn.com>
That code will fail if there is an embedded quote in one of the fields. In
that case the csv will replace the embedded quote with a "", and that will
make this code fail.
But it does seem to work if you substitute a tag for a double quote (
$line =~ s/""/"/g; ), then substitute back when through, this is much
more elegant than what I had written.
Marshall
Matija Papec wrote:
> X-Ftn-To: Max Power
>
> Mike@Kordik.net (Max Power) wrote:
> >I have a comma delimted file that I need to parse. I need to do
> >somethign with each element in between commas however there are a few
> >strings that have commas in them. For example:
> >
> >1, high, "text1, text2", some_more_text
> >
> >I need the "text1, text 2" string to count as one element. When I use
> >split and split on a comma I get two elements. Now all strings have
> >commas in them though. How do I get PERL to treat text in between
> >quotes as one element even thought it might have the delimiter in it?
>
> $line = '1, high, "text1, text2", some_more_text';
>
> for (split(/"/, $line)) {
> push @fields, ++$i%2 ? split(/, /) : $_
> # same thing with if statement
> # if (++$i%2) { push @fields, split(/, /) } else { push @fields, $_ }
> }
>
> First you split the line using " and then split 0,2nd,4th.. element with
> ', ' pushing results into @fields.
>
> --
> Matija
------------------------------
Date: Wed, 8 Jan 2003 16:30:10 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Dealing with split() and quotes
Message-Id: <slrnb1p9ji.m4i.tadmc@magna.augustmail.com>
Marshall Dudley <mdudley@execonn.com> wrote:
> But it does seem to work if you substitute a tag for a double quote (
> $line =~ s/""/"/g; )
^^^^^^
That is not a "tag".
Tags must start with < and end with >.
That is an "entity reference".
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 8 Jan 2003 13:39:16 -0800
From: e_d_dolan@hotmail.com (Liz)
Subject: Existence of an executable of unknown location
Message-Id: <4177e10.0301081339.6801ed70@posting.google.com>
Hi,
I'm trying to check whether the user executing my Perl script has a
particular executable in their path. In a Unix shell, I might do a
"which executable_name" to check an executable's existence, even
though I don't really care where their executable is. Does anyone
know of a tool in Perl to do this that doesn't rely on any system
calls?
Thanks,
Liz
------------------------------
Date: Wed, 08 Jan 2003 23:02:26 +0100
From: Matija Papec <mpapec@yahoo.com>
Subject: Re: Existence of an executable of unknown location
Message-Id: <jn7p1v4rbk5sddo2e40oc4kvgb779l7bf1@4ax.com>
X-Ftn-To: Liz
e_d_dolan@hotmail.com (Liz) wrote:
>Hi,
>
>I'm trying to check whether the user executing my Perl script has a
>particular executable in their path. In a Unix shell, I might do a
>"which executable_name" to check an executable's existence, even
>though I don't really care where their executable is. Does anyone
>know of a tool in Perl to do this that doesn't rely on any system
>calls?
%ENV has user path, but AFAIK you must make all the checks
(if -e "$path/somexec" ..)
--
Matija
------------------------------
Date: 08 Jan 2003 22:13:36 GMT
From: Rafael Garcia-Suarez <rgarciasuarez@free.fr>
Subject: Re: Existence of an executable of unknown location
Message-Id: <slrnb1p8tu.14i.rgarciasuarez@dat.local>
Liz wrote in comp.lang.perl.misc :
>
> I'm trying to check whether the user executing my Perl script has a
> particular executable in their path. In a Unix shell, I might do a
> "which executable_name" to check an executable's existence, even
> though I don't really care where their executable is. Does anyone
> know of a tool in Perl to do this that doesn't rely on any system
> calls?
I just can't imagine how you can possibly know whether a file exists and
is executable without a system call.
Or did you mean a call to system() ? Sorry.
In this case : get the directories in $ENV{PATH}, for each directory
read its contents, search it for an executable file by the name you're
looking for, and go on until you've your answer. This should be
straightforward to translate to Perl ;- (and don't forget to check the
return values of system calls)
------------------------------
Date: Wed, 8 Jan 2003 16:38:17 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Existence of an executable of unknown location
Message-Id: <slrnb1pa2p.m4i.tadmc@magna.augustmail.com>
Liz <e_d_dolan@hotmail.com> wrote:
> In a Unix shell, I might do a
> "which executable_name" to check an executable's existence, even
> though I don't really care where their executable is. Does anyone
> know of a tool in Perl to do this that doesn't rely on any system
> calls?
http://search.cpan.org/author/PEREINAR/File-Which-0.05/Which.pm
You probably should have searched for such a module before posting...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 8 Jan 2003 21:16:34 GMT
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: finding files older than a given date
Message-Id: <avi4fi$2ee$1@mamenchi.zrz.TU-Berlin.DE>
Tad McClellan <tadmc@augustmail.com> wrote in comp.lang.perl.misc:
> find( \&unwanted, 'd:/stuff');
Hehe!
Anno
------------------------------
Date: 8 Jan 2003 13:04:35 -0800
From: entfred@hotmail.com (Entfred)
Subject: Re: How do you use cgi.pm to parse multiple records of data entered on an html screen?
Message-Id: <d6e12cad.0301081304.5f15cf78@posting.google.com>
tadmc@augustmail.com (Tad McClellan) wrote in message news:<slrnb1oc02.kmo.tadmc@magna.augustmail.com>...
> Entfred <entfred@hotmail.com> wrote:
>
> > I am trying to program a form that allows multiple lines entered on
> > the screen to be saved in a data structure for future processing.
>
>
> Do you really mean multiple _lines_?
>
> Or do you mean multiple form inputs?
I mean multiple form inputs.
For example, if you have a perl program that is dynamically generating
form input statements, you might have the situation where you display,
for example, 8 lines of form inputs on a screen. The user can change
any values of the fields on each line and then presses an update button
to submit the fields to a program that saves the data to an Oracle database
(or flat file).
I think the complication comes in where a user enters some fields and
leaves some blank. For example, if a user enters something like this:
track: 1 artist: Jimi Hendrix CD: Are You Experienced
track: 10 artist: John Doe CD:
track: 12 artist: CD: Unknown Musician Compilation
press submit to save data on screen to database: ------
|submit |
---------
In this case, not all fields are filled out by the user,
so the param values will be null in some cases. I guess this
doesn't make a difference in your example?
-- Entfred
>
>
> > For example, a user might enter 4 records on an HTML screen having
> > track, artist, CD. When the user presses the submit button, the fields
> > are passed to a CGI program to parse the fields.
> >
> > I have something like the following working, but I would rather use
> > CGI.PM to do this. I didn't see any built-in functions in CGI.PM to do
> > this.
>
>
> If I understand the "this" you are referring to, then param() can do it.
>
>
> > My next step was to go through all the cgi.pm source and, perhaps,
> > modify the lines that do the actual parsing, but before doing that,
> > I was wondering if there is a function I overlooked when reading all
> > the cgi.pm documentation.
> >
> > Thanks for any hints or tips on this!
>
>
> You should enable strictures:
>
> use strict;
>
>
> > foreach $entry (@entries) {
>
>
> foreach my $name ( param() ) {
>
>
> > local($name, $value) = split(/=/, $entry);
>
>
> You should always prefer my() over local(), except when you can't.
>
> my $value = param($name);
------------------------------
Date: Wed, 8 Jan 2003 20:34:52 +0000 (UTC)
From: Irving Kimura <irving_kimura@lycos.com>
Subject: How to install mod locally? LIB=./foo fails
Message-Id: <avi21c$m2s$1@reader1.panix.com>
How do I install a module locally? Following the man page for
MakeMaker, I've tried both
% perl Makefile.PL LIB=${HOME}/lib
and
% perl Makefile.PL PREFIX=${HOME}
before calling
% make && make test && make install
With the first approach, make test fails with a message to the
effect that autosplit.ix can't be found. With the second approach,
the .pm file is never copied to the destination directory.
Where can I find the correct instructions for a local install?
Thanks,
-Irv
PS. FWIW, I'm running Linux 2.4.17-686-smp, perl 5.6.1
------------------------------
Date: 8 Jan 2003 12:07:34 -0800
From: zarkssmjkn@yahoo.com (Lee)
Subject: Re: Nested sort
Message-Id: <261ce853.0301081207.35591afc@posting.google.com>
Thanks for the scripts. I find both the scripts doing what I needed.
The script,I have is a page long and does not do the entire task.I
donot think it needs a look by pros like you on this forum. I feel it
is best not posted.
I am seeing how things can be more simple and sweet. I need to learn
perl more to share the code, I think.
Thanks again to James,John,Goldberg.
------------------------------
Date: Wed, 08 Jan 2003 22:33:06 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: No such file or directory error
Message-Id: <3e1c8796.272665072@news.erols.com>
fmmpd@hotmail.com (Rondoggung) wrote:
: I am setting up a click tracking script (Ultimate Ad Tracker). The
: script used to work on all my previous servers but not on my new
: server.
Were you unable to get help from the program's author or vendor?
Did you try to get help from them?
: I can actually access the admin.cgi login page but it wouldn't let me
: set the admin password on first installation. It produces this error
:
: Cant open /var/www/cgi-bin/track/data/adps.txt(No such file or
: directory)!
If it's trying to open the file in '>' mode, which creates a new file
if necessary, you'd get that error if the directory does not exist.
Does the directory /var/www/cgi-bin/track/data exist?
------------------------------
Date: Wed, 08 Jan 2003 23:57:38 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Recreating directory hierarchy
Message-Id: <94bp1vg124djqtj8mscvdobv5cs5fs9jdm@4ax.com>
On Mon, 06 Jan 2003 23:23:28 -0500, Benjamin Goldberg
<goldbb2@earthlink.net> wrote:
> return if -e $dest;
^^^^^^
Just a minor point, not strictly Perl-related: wouldn't it be better
to warn() the user too?
Notice that I'm aware yours is only a quick example, but since it's
rather elaborate the OP might think to use it more or less as is and
possibly get an unexpected behaviour...
Michele
--
>It's because the universe was programmed in C++.
No, no, it was programmed in Forth. See Genesis 1:12:
"And the earth brought Forth ..."
- Robert Israel on sci.math, thread "Why numbers?"
------------------------------
Date: Wed, 08 Jan 2003 14:46:55 -0500
From: Marshall Dudley <mdudley@execonn.com>
Subject: reload not terminating process
Message-Id: <3E1C802F.350B0AF8@execonn.com>
I have a perl program that takes about 2 seconds to complete. I have
noticed occassionally all the available servers will become busy and top
reports that this program is running 30 or so intances. When I do a
server-status, I find that they are all being requested by the same ip.
Thus it appears that the user has hit reload 30 or more times in a short
period, causing the program to execute each time.
I was under the impression that if you hit the reload or stop on a
browser, it is suppose to send a kill to the process so this doesn't
happen. I am not sure quite where to look to resolve this issue, in the
program, unix, apache, or is there anything that can be done at all?
Thanks,
Marshall
------------------------------
Date: Wed, 8 Jan 2003 16:35:40 -0600
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: reload not terminating process
Message-Id: <slrnb1p9ts.m4i.tadmc@magna.augustmail.com>
Marshall Dudley <mdudley@execonn.com> wrote:
> I have a perl program that takes about 2 seconds to complete. I have
> noticed occassionally all the available servers will become busy and top
> reports that this program is running 30 or so intances. When I do a
> server-status, I find that they are all being requested by the same ip.
^^^^^^^
> Thus it appears that the user has hit reload 30 or more times in a short
^^^^^^^^
> period, causing the program to execute each time.
Or it appears that 30 people all behind the same firewall
are accessing your site simultaneously.
Maybe they are in a training class and the instructor just
told them to go to your site or something.
IPs correspond to _machines_, not to people.
> I was under the impression that if you hit the reload or stop on a
> browser, it is suppose to send a kill to the process so this doesn't
> happen. I am not sure quite where to look to resolve this issue, in the
> program, unix, apache, or is there anything that can be done at all?
If you rewrote your program in Python or Java, you would have
the same problem, so it most certainly is not a Perl-related problem.
Ask in a newsgroup that has something to do with WWW stuff.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 8 Jan 2003 16:49:47 -0600
From: "TH" <tambaa.Xspam@yahoo.com>
Subject: Simple Filter
Message-Id: <avi9u3$e8r$1@tilde.itg.ti.com>
Below is a snippet of some code that I am having trouble with. The if
statement always evaluates to true whether the word [spam] (could be [SPAM])
is part of the content or not. I have tried different variations like
escaping [ and ] but none works. What am I doing wrong?
$content="This is junk mail";
$text="[spam]";
if ($content =~ /$text/i) {print "Content contains $text\n"; exit;}
print "Content does not contain $text\n";
------------------------------
Date: Wed, 08 Jan 2003 22:20:29 GMT
From: "Dick Penny" <penny1482@attbi.com>
Subject: strict & warnings did NOT trigger?
Message-Id: <Nu1T9.493249$GR5.204967@rwcrnsc51.ops.asp.att.net>
I just had a miserable debugging session caused by my fat fingers that 'use
strict' and 'use warnings' did NOT catch. Can someone tell me why?
I have strict & warnings in main script. In a 'required' script/file I had a
line
$cumdelta += delta;
Narry a hint twas given of anything wrong. By text search there was not any
other instance of 'delta' in the main nor 'required' files.
--
Dick Penny
------------------------------
Date: Wed, 08 Jan 2003 22:44:19 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: strict & warnings did NOT trigger?
Message-Id: <x7k7hfntx9.fsf@mail.sysarch.com>
>>>>> "DP" == Dick Penny <penny1482@attbi.com> writes:
DP> I just had a miserable debugging session caused by my fat fingers
DP> that 'use strict' and 'use warnings' did NOT catch. Can someone
DP> tell me why?
DP> I have strict & warnings in main script. In a 'required'
DP> script/file I had a line $cumdelta += delta; Narry a hint twas
DP> given of anything wrong. By text search there was not any other
DP> instance of 'delta' in the main nor 'required' files.
strict is file or block scoped.
-w is program wide but use warnings is again file/block scoped.
so you should always put a use strict in all required/used files.
and add use warnings if you don't enable -w
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
----- Stem and Perl Development, Systems Architecture, Design and Coding ----
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
Damian Conway Perl Classes - January 2003 -- http://www.stemsystems.com/class
------------------------------
Date: Wed, 08 Jan 2003 22:43:46 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: strict & warnings did NOT trigger?
Message-Id: <3e1ca816.280986540@news.erols.com>
"Dick Penny" <penny1482@attbi.com> wrote:
: I just had a miserable debugging session caused by my fat fingers that 'use
: strict' and 'use warnings' did NOT catch. Can someone tell me why?
:
: I have strict & warnings in main script. In a 'required' script/file I had a
: line
: $cumdelta += delta;
: Narry a hint twas given of anything wrong. By text search there was not any
: other instance of 'delta' in the main nor 'required' files.
The strict and warnings pragmas are scoped. Enabling them in the main
script (most likely file-scoped) doesn't mean they're automatically
enabled in any scope created by require().
If you want them in the other file, use() them in the other file.
------------------------------
Date: 8 Jan 2003 11:34:12 -0800
From: jaykchan@hotmail.com (Jay Chan)
Subject: The Best and The Easiest Perl Module to Draw 2-D Line Chart?
Message-Id: <c7e5acb2.0301081134.7e0c585@posting.google.com>
I would like to know which Perl module I should use to draw a simple
2-dimension line chart.
The line-chart has YY/MM in the X-axis and some unit-of-measurement
(sq-ft, pounds, linear-feet, and pieces) in the Y-axis. In the middle
of the chart, I want to put 4 lines going across to show the
ups-and-downs of output in term of sq-ft, pounds, linear-feet, and
pieces respectively. This is to show the various measurements of
production output over the periods of 12 months.
I believe I can use GD.PM to draw this chart. But I am wondering
whether there are other modules that are more suitable in making this
type of line-chart. Hopefully, there is a module that provides a
high-level API-interface. Then, I only need to pass the text for the
labels, line-color selection, and the data-set as parameters instead
of getting down to the dirty details to paint the line pixel by pixel.
If a module has 90% of what I want it to do, and the 10% that it
cannot do is something that I can live with, I will be perfectly happy
to trade in that 10% for ease-of-use.
Thanks in advance for any suggestion.
Jay Chan
------------------------------
Date: Wed, 8 Jan 2003 21:12:02 +0100
From: "Murat Ünalan" <murat.uenalan@gmx.de>
Subject: Re: The Best and The Easiest Perl Module to Draw 2-D Line Chart?
Message-Id: <avi0ms$85m$03$1@news.t-online.com>
> I would like to know which Perl module I should use to draw a simple
> 2-dimension line chart.
[snip]
> I believe I can use GD.PM to draw this chart. But I am wondering
> whether there are other modules that are more suitable in making this
GD::Graph (skim through the samples dir)
Alternativly Tk has a canvas which is mighty. Try the "widgets" demo
(shellcmd)
to see the working examples.
PS: I think this posting would have been better placed to
comp.perl.lang.modules
Murat
------------------------------
Date: 8 Jan 2003 12:14:23 -0800
From: prettyinperl@yahoo.com (Perl B. Best, FTR)
Subject: Re: These are discouraging stats to Perlistas & Pythonistas...
Message-Id: <4aa9139d.0301081214.4b9c37a4@posting.google.com>
llewelly <llewelly.at@xmission.dot.com> wrote in message news:<86of6sshyq.fsf@Zorthluthik.foo>...
> >
> > Maybe these stats say more about dice.com itself than about the
> > state of the economy. Are the numbers reflected in other sites?
> > Or is dice.com *the* place to go, so we can take it as representative?
> *shrug*
>
> Of all the software development jobs I've had, *none* appeared on
> dice.com.
>
> And I've used perl at every software development job I've had, though
> none of them listed perl as a requirement, or even as a desirable
> skill.
Most managers don't know what Perl or Tk is. All they read is fluff
supported by M$ advertizing bucks. One of the most useful things to
know is how to cross link languages, so when some asswipe tells you to
write a program and it must be in C++, you do something like this:
#include "blah.h"
// Bill Gates blows
int
main(int argc, char** argv) {
runPerl();
}
Once most of these losers figure out how much more can be done with
less work using Perl and Tk, they pretend like they thought of it to
their bosses.
------------------------------
Date: Wed, 08 Jan 2003 15:28:51 -0500
From: Andrew Lee <>
Subject: Re: These are discouraging stats to Perlistas & Pythonistas...
Message-Id: <i02p1vkdio5uvmfrj84koeoe1mr2ibb3jk@4ax.com>
On Tue, 07 Jan 2003 19:33:30 GMT, Carl Banks <imbosol@vt.edu> wrote:
>Robert Oschler wrote:
>> I can't look at dice.com anymore, too depressing. Some appx stats:
>>
>> Date C++ jobs Java jobs
>>
>> 3/2000 42000 31000
>> 10/2003 2200 2800
>>
>> That's right, almost a 20 to 1 loss of job reqs in C++, and 10 to 1 in Java.
>> Also note, Java is now in the lead over C++
>>
>> I hate the dot-bust.
>
>
>I don't know if I trust a website that believes C and C++ are the same
>langauge, which this site appears to do.
There is no end to the stupidity of recruiters/headhunters/incopetent
IT managers. How many times have you seen an advertisement for PEARL?
I had a manager once who insisted that strict.pm was useless "cause it
breaks all my programs."
Sheesh!
------------------------------
Date: Wed, 08 Jan 2003 22:52:33 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: tracing the HTTP
Message-Id: <3e1cab15.281753665@news.erols.com>
"Sascha Kerschhofer" <skerschhofer@yahoo.de> wrote:
: How can I log the communication between my web-browser and any webserver?
I reckon you could have a simple proxy sit between the browser and the
outside world, unobtrusively taking notes.
: Or is there any software that does that for me (Windows Software)?
There probably is.
Did you have a Perl question?
------------------------------
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 4368
***************************************
