[6455] in Perl-Users-Digest
Perl-Users Digest, Issue: 80 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Mar 10 00:03:00 1997
Date: Sun, 9 Mar 97 19:00:22 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 9 Mar 1997 Volume: 8 Number: 80
Today's topics:
cgi db or random access ? <102646.1641@CompuServe.COM>
how do i read "man page" of a module on a PC? brz@hotmail.com
Re: how do i read "man page" of a module on a PC? (Nathan V. Patwardhan)
Re: How to spam - legitimately <tchrist@mox.perl.com>
Re: newbie question: how to pick a particular line in p (Dave Thomas)
Re: newbie question: how to pick a particular line in p <ajohnson@gpu.srv.ualberta.ca>
Re: Newbie: Help With " <buehner@pfaffenhofen.netsurf.de>
PLEASE, HELP A NEWBIE!! 2 <fabiano.petrone@ud.nettuno.it>
PLEASE, HELP A NEWBIE!! 2nd attempt <fabiano.petrone@ud.nettuno.it>
Re: PLEASE, HELP A NEWBIE!! 2nd attempt <mgjv@comdyn.com.au>
PLEASE, HELP A NEWBIE!! <fabiano.petrone@ud.nettuno.it>
Re: RAND/SRAND query <tchrist@mox.perl.com>
Reading a password on Win32 <teney931@cs.uidaho.edu>
running Perl on IIS 2.0 <audible@fox.nstn.ca>
Re: simple new question! (Steffen Beyer)
Re: simple new question! <tchrist@mox.perl.com>
Sort question viet@airmail.net
Re: Which version of Perl do I have? <anirvan@crl.com>
Re: Which version of Perl do I have? <tchrist@mox.perl.com>
Re: Who makes more $$ - Windows vs. Unix programmers? (David LeBlanc)
Re: Who makes more $$ - Windows vs. Unix programmers? (---)
Win32::ODBC & MS SQL Servers IMAGE data type, anyone us <humphric@akcity.govt.nz>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 9 Mar 1997 23:17:09 GMT
From: richard ferry <102646.1641@CompuServe.COM>
Subject: cgi db or random access ?
Message-Id: <5fvgdl$d0l$1@mhadf.production.compuserve.com>
i want to post a scrollable list of my users on my intranet. i
want the user to be able to enter a partial name and then select
from the list. i have about 1000 users.
i was thinking about using a unix random access db unless there
is a cgi db product out there.
thanks in advance.
------------------------------
Date: Sun, 09 Mar 1997 18:41:03 -0600
From: brz@hotmail.com
Subject: how do i read "man page" of a module on a PC?
Message-Id: <857953927.1784@dejanews.com>
i saw people say read "perldoc LWP::Simple.pm" but
i don't have this perldoc in my win32 perl5.003 build
303.
how do i read the "man page" of modules on a PC then?
thanks.
brz
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: 10 Mar 1997 02:25:49 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: how do i read "man page" of a module on a PC?
Message-Id: <5fvrfd$pek@fridge-nf0.shore.net>
brz@hotmail.com wrote:
: i saw people say read "perldoc LWP::Simple.pm" but
: i don't have this perldoc in my win32 perl5.003 build
: 303.
Follow the links on http://www.perl.com/perl to the Perl Documentation
and look for the HTML-ized versions of the LWP doc.
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: 9 Mar 1997 23:36:22 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: How to spam - legitimately
Message-Id: <5fvhhm$188$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
carroll@tjc.com (Terry Carroll) writes:
:"Some email" doesn't refer to a particular piece of email. "a piece of
:email" is lengthy and unsatisfactory.
That's your opinion. It does not happen to be mine, nor it would
appear, that of many others who frequent these newsgroups. To my ear,
it sounds immeasurably better to say "some email" than the ungrammatical
neologism "some emails" (he says, pretending that email itself were not
a neologism. :-)
:The point is, well-educated native speakers of English are going around
:saying "send me an email," and "I got your email," etc. It's pretty much
:standard, and it is an advancement, because it supplies a word where no
:word previously existed.
I believe what's happening here is a socio-linguistic phenomenon.
Sending email was once the exclusive domain of scientists, mathematicians,
and related technical professionals, all of whom have historically treated
language with considerably more care than does the man on the street.
(Witness the persistence in technical writing of forms such as datum,
indices, minima, and radii and their relative rarity in other writing.)
Email is no longer something practised by programmers and programmers
alone. Intead, access to email now extends into the homes and minds of
the teaming millions. And these non-technical users, whether for lack of
understanding of what they're discussing (consider the recent atrocities
committed by the popular press in which we see bacteria and phenomena
misused as singulars) or simply because they don't give a flying flip,
continue to unintentionally fold, spindle, and mutilate our living
language just as they have always done. This isn't entirely terrible;
otherwise we'd still be speaking the language of Shakespeare, Chaucer,
or even Beowulf, and I hear few calling for a return to such days.
What was abhorrent to us may be commonplace to our successors.
Some of these corruptions should with good and sound reason be decried as
foul and unwanted, while others are reasonably harmless. Examples that
should, in my seldom humble opinion, be resisted at every step and every
turn include the erosion of unique's unique meaning into one merely
unusual. Changes such as these are particularly unwelcome because there
is nothing to replace them: no other single word in the English language
carries the same meaning as does unique. Similar transgressions,
albeit potentially less destructive in the grand scheme of things,
include confusions over lie/lay, affect/effect, appraise/apprise,
refrain/restrain, import/export, and immigrate/emigrate.
Perhaps more disturbing is the gradual loss of moods and tenses. Some of
these are perhaps better characterized as venial rather than mortal
transgressions, at least when nothing irreplaceable is lost. But these,
too, nevertheless grate against the educated ear. I cite as one example
the ubiquitous loss of the past participle amongst even educated speakers,
from whom we nowadays far too commonly hear such malformed phrases as
"I've never came this way before" or "Have you ever sang that song?".
I have heard such utterances the world over, from Tucson to Toronto, from
Banbury to Brisbane. While nothing is lost, but it still hurts to hear.
A related case, but perhaps more serious because true loss is occurring,
is the growing lack of ability to distinguish "It's important that she
is here" from "It's important that she be here". They mean very differ
things, and are never interchangeable. Most native speakers intuitively
realize this when presented with the pair, even though few in this
grammatically challenged modern world could explain that it is in fact
changing here is a switch from the indicative mood to the subjunctive one.
If one form were lost for good, then we would have to invent more extended
and cumbersome circumlocutions to express the same nuance.
Sometimes when some form or meaning is lost, a different but equivalent
alternative form moves in to replace it. Compare the scientist's use
of "this datum is/these data are" as discrete count nouns versus the
general populace's "this data is/some data is" as a mere mass noun,
which has triggered the emergence of the term "datapoint" to replace
the count noun usage.
I choose this example because it has strong parallels with our current
topic of debate. You see, it would appear that those who were involved
with email prior to its full-scale adoption by the meandering masses
continue to use it as a mass noun, as in "I have too much email" or
"Please send me email". This usage stands in stark constrast to the
equivalent phrases as uttered by the non-technical user, who seems to
find "I have too many emails" and "Please send me a few emails" to be
well-formed and pleasant to the ear.
But such use has been and in my experience for the moment remains to
the technically-educated ear the equivalent of baby talk by bright-eyed
and well-meaning toddlers struggling to move into the world of computers
and communications. It is probably unseemly that they should be unduly
chidden for such baby talk, for they are trying their best to become
comfortable with this strange new world. They're learning their way
around, sometimes making mistakes, other times taking short-cuts we are
ourselves may be too conservative to consider.
But let us at the same time continue to provide careful and consistent
examples for them to follow. The technician's use of email as a mass
noun has remained standard, accepted, and well understood for many
years without change, just as the scientist's use of data as a count
noun has remained inviolate. But when the general public and the media
that serve it manage to catch hold of something new, you may be quite
certain that terminology related to the matter will be warped, more
out of misunderstanding than malice, into what they think it is--to the
eternal dismay of those few who pioneered the field.
Think about hackers versus crackers here. Or as a more recent mutilation,
dwell upon the media's confusion (and thus that of nearly everyone who
hasn't dedicated themselves to the field) regarding the difference
between a "web page" and a "home page". Think of the perpetually
repeated confusion between what is the net and what is the web, or the
perceived interchangeability of Perl and CGI, of TCP and IP, of user
agent and transport agent, or of operating system and command shell.
In the spirit of tolerance and understanding, shall we then let all
these distinction pass quietly out of existence as well, and instead
invent new words to replace those which they have usurped from us?
I say we should not.
Sure, it's hip and trendy to have email, to send and receive it, and
to talk about it; likewise with home pages and web pages, with the net
and web. One could argue that this is merely a different dialect of
English, as legitimate in its own right as is Black English or Cockney.
But as with those dialects, so too does the use of imprecise technical
jargon, pseudotechnobabble if you would, mark its practitioners as
different in background and education from those who continue to choose
their technical words words more carefully.
Dialects cannot and should not be prevented from existing, or even
flourishing. Use what you will. But I give this warning to whoever
thinks these matters of careful usage of technical terms utterly
irrelevant: that such use will leave you a marked man. This may have
unpleasant consequences, such as causing an interviewer to disqualify you
for a technical position, just as quickly as someone speaking nothing
but heavy Creole might be disqualified from becoming a presidential
speech writer, intelligent and perceptive though they may well be.
Of course, this gut-level reaction to dialect can swing the other
direction as well. Precise terminology can also mark you and cause
unpleasant ramifications. But I for one would prefer to run the
risk of offending someone by appearing technically literate.
This would seem much the lesser of the two evils when you consider that
the alternative would be to risk ridicule and rejection by my peers for
spouting ephemeral and imprecise media-mandated pseudotechnobabble and
thus virtually guaranteeing that no one from my chosen field will ever
again take me seriously.
I suggest that followups be directed to alt.usage.english; this has gone
on quite long enough here.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
If God had meant for us to be naked, we would have been born that way.
------------------------------
Date: 9 Mar 1997 23:01:41 GMT
From: dave@fast.thomases.com (Dave Thomas)
Subject: Re: newbie question: how to pick a particular line in perl5 (win32)
Message-Id: <slrn5i6g49.1jm.dave@fast.thomases.com>
On Sun, 09 Mar 1997 16:51:16 -0600, brz@hotmail.com <brz@hotmail.com> wrote:
> I retrived some data off the web and would like to get
> the 27th line for example.
# Time-stamp: <97/03/09 16:56:41 dave>
while (<>) {
print "Line 27: $_" if ($. == 27);
}
Or to get a range:
# Time-stamp: <97/03/09 16:57:54 dave>
while (<>) {
print "Line 27: $_" if (20..25);
}
--
_________________________________________________________________________
| Dave Thomas - Dave@Thomases.com - Unix and systems consultancy - Dallas |
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
------------------------------
Date: Sun, 09 Mar 1997 20:14:48 -0600
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: newbie question: how to pick a particular line in perl5 (win32)
Message-Id: <33236E98.5747EC1C@gpu.srv.ualberta.ca>
Dave Thomas wrote:
>
> On Sun, 09 Mar 1997 16:51:16 -0600, brz@hotmail.com <brz@hotmail.com> wrote:
> > I retrived some data off the web and would like to get
> > the 27th line for example.
>
> # Time-stamp: <97/03/09 16:56:41 dave>
>
> while (<>) {
> print "Line 27: $_" if ($. == 27);
> }
>
might you also want to jump out of the
loop (especially if <> has many more lines than 27)?
while (<>) {
print "Line 27: $_" and last if ($. == 27);
}
regards,
andrew
------------------------------
Date: Sun, 09 Mar 1997 22:33:42 +0100
From: Thomas Buehner <buehner@pfaffenhofen.netsurf.de>
Subject: Re: Newbie: Help With "
Message-Id: <VA.0000003b.000e1de2@tbuero1>
Your string would be interpreted as consisting of three parts, as the
first double quote opens the quote, the second double quote closes it,
the next one opens it, etc:
1st part: "<A HREF=", 2nd part: mailto:myaddr@whatever.net, 3rd part:
">Mail</A>\n".
An easily readable solution would be to replace the opening and closing
quotes by single quotes. This way, Perl ignores what is inside the
string (including the double quotes). For this solution, to print a
newline at the end of the line (instead of the two letters \ and n), you
would have to print the newline separately, within double quotes (you
want Perl to *not* ignore the format of the strings's contents, this
time):
print '<A HREF="mailto:myaddr@whatever.net">Mail</A>', "\n";
There may be more elegant solutions, but this one works.
Thomas Buehner
> I am trying to use the following command and am having problems with
it:
>
> :: print "<A HREF="mailto:myaddr@whatever.net">Mail</A>\n";
------------------------------
Date: 9 Mar 1997 23:24:18 GMT
From: Fabiano <fabiano.petrone@ud.nettuno.it>
Subject: PLEASE, HELP A NEWBIE!! 2
Message-Id: <5fvgr2$rr8@qualcuno.nettuno.it>
In article <5fvgfg$rr8@qualcuno.nettuno.it> Fabiano,
fabiano.petrone@ud.nettuno.it writes:
#!usr/bin/perl
$ANNUAL_PAY_RATE = 52 * 5; #that's 5 shekels per week.
open(STUFF, "stuff") || die "Can't open stuff: $!\n";
while(<STUFF>) {
($beastie, $noses, $hazard, $premium, $servants)
=split(/:/, $_);
$totprem = $premium * $noses;
$cost = $totprem + $servants * $ANNUAL_PAY_RATE;
write;
}
exit;
format top =
Fabiano Inc. Stuff
Beastie Nose Insured Premium Servants Total est.
Name Count Against Each Total Yearly Cost
------- ------ -------- ---- ----- -------- ------------
------------------------------
Date: 9 Mar 1997 23:54:50 GMT
From: Fabiano <fabiano.petrone@ud.nettuno.it>
Subject: PLEASE, HELP A NEWBIE!! 2nd attempt
Message-Id: <5fvika$sej@qualcuno.nettuno.it>
In article <5fvgfg$rr8@qualcuno.nettuno.it> Fabiano,
fabiano.petrone@ud.nettuno.it writes:
Please excuse the previous incomplete posts.
The script is the following:
#!usr/bin/perl
$ANNUAL_PAY_RATE = 52 * 5; #that's 5 shekels per week.
open(STUFF, "stuff") || die "Can't open stuff: $!\n";
while(<STUFF>) {
($beastie, $noses, $hazard, $premium, $servants)
=split(/:/, $_);
$totprem = $premium * $noses;
$cost = $totprem + $servants * $ANNUAL_PAY_RATE;
write;
}
exit;
format top = (myformattop).
format STDOUT = (myformatSTDOUT).
I've deleted the originals format top and format STDOUT because they
create some problems mailing them (I don't know why): they're exactly
identical to the book example so I think (I hope...) the problem is not
here...
------------------------------
Date: Mon, 10 Mar 1997 12:58:55 +1100
From: Martien Verbruggen <mgjv@comdyn.com.au>
Subject: Re: PLEASE, HELP A NEWBIE!! 2nd attempt
Message-Id: <33236ADF.6E0B@comdyn.com.au>
Fabiano wrote:
>
> In article <5fvgfg$rr8@qualcuno.nettuno.it> Fabiano,
> fabiano.petrone@ud.nettuno.it writes:
>
> Please excuse the previous incomplete posts.
>
> The script is the following:
[stuff deleted]
And what is the question? I mean.. your subject doesn't lead to
anything. The best help I can give this newbie is to read the guidelines
on posting to this newsgroup, posted here regularly. Be clear. Ask a
question. Choose a subject that relates to the question.
--
Martien Verbruggen
Webmaster www.tradingpost.com.au
Commercial Dynamics Pty Ltd, N.S.W., Australia
------------------------------
Date: 9 Mar 1997 23:18:08 GMT
From: Fabiano <fabiano.petrone@ud.nettuno.it>
Subject: PLEASE, HELP A NEWBIE!!
Message-Id: <5fvgfg$rr8@qualcuno.nettuno.it>
Hi to Everybody
I'm learning this language with MacPerl 5 (the perl port for the
macintosh) ad the WALL-SCHWARTZ book "programming with perl".
Ok, at pg. 41 I've found an interesting script: I've just copied it and
compiled, but Mac Perl give me the following error:
"Missing right bracket, at end of line"
I've controlled the script : I've just copied it from the book and I
can't understand the error: maybe a type error of the book or what?
here follows the script... thanks in advance to everybody who'll mail me
the answer (fabiano.petrone@ud.nettuno.it)
Bye
Fabiano
#!usr/bin/perl
$ANNUAL_PAY_RATE = 52 * 5; #that's 5 shekels per week.
open(STUFF, "stuff") || die "Can't open stuff: $!\n";
while(<STUFF>) {
($beastie, $noses, $hazard, $premium, $servants)
=split(/:/, $_);
$totprem = $premium * $noses;
$cost = $totprem + $servants * $ANNUAL_PAY_RATE;
write;
}
exit;
format top =
Fabiano Inc. Stuff
Beastie Nose Insured Premium Servants Total est.
Name Count Against Each Total Yearly Cost
------- ------ -------- ---- ----- -------- ------------
------------------------------
Date: 9 Mar 1997 23:48:08 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: RAND/SRAND query
Message-Id: <5fvi7o$188$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
"Timothy H. Keitt" <tkeitt@santafe.edu> writes:
:First, you can't generate truely random numbers, only pseudo-random
:numbers. Just how "random" they are depends on your random number
:generator. I assume perl uses UNIX's rand() function. This is one of
:the worst random number generators ever devised! Its probably ok for
:really simple applications (choose a random host, etc.), but not for any
:kind of Monte Carlo applications.
:
:Now the question: Can you provide an alternate random number generator
:to perl at build- or run-time?
See the Math::TrulyRandom module from CPAN.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
tmps_base = tmps_max; /* protect our mortal string */
--Larry Wall in stab.c from the perl source code
------------------------------
Date: 9 Mar 1997 20:25:51 GMT
From: "Aric TenEyck" <teney931@cs.uidaho.edu>
Subject: Reading a password on Win32
Message-Id: <01bc2cc7$e4df8860$84706581@rocket>
I'm new to Perl, and am using it to write a PGP wrapper. I would like to
read the pass phrase in such a manner that it's not echoed to the screen.
I'm running on Win32, so I can't do like the camel book suggests and do
this:
system "stty -echo";
$password = <STDIN>;
because there is no stty on Win32. I tried this:
system "echo off";
$password = <STDIN>;
but it still shows what I type. How do I read input without echoing it?
Aric
------------------------------
Date: 10 Mar 1997 02:15:14 GMT
From: "Brian Cohen" <audible@fox.nstn.ca>
Subject: running Perl on IIS 2.0
Message-Id: <01bc2cf8$b505d0a0$7d11ba89@master>
Hi!
I was wondering if anyone knows how to setup a perl script properly so IIS
2.0 will actually run the thing. I've put the perl scripts in a cgi-bin
and clicked on the execute button but nothing happens.
If anyone does know I would appreciate the advice.
Regards,
Michael
audible@fox.nstn.ca
------------------------------
Date: 9 Mar 1997 21:12:49 GMT
From: sb@en.muc.de (Steffen Beyer)
Subject: Re: simple new question!
Message-Id: <5fv94h$qcl$1@en1.engelschall.com>
Tom Christiansen <tchrist@mox.perl.com> wrote:
> In comp.lang.perl.misc,
> webster@dozyrosy.demon.co.uk writes:
> : $true = 1;
> : $false = 0;
> : $abc = $false; # or whatever, to start with
> Bad idea. Get used to 0 and '' being false, all else being true.
Hey, wait a second! :-)
Didn't Larry Wall say that Perl was about shortcuts and allowing people
to do things the way they like to?! :-)
Didn't he say that the Perl motto was "There's more than one way to do it"?!
:-)
After all, "0" and "1" aren't far-fetched choices for "false" and "true",
are they? :-)
Sincerely yours,
--
|s |d &|m | Steffen Beyer <sb@sdm.de> (+49 89) 63812-244 fax -150
| | | | software design & management GmbH & Co. KG
| | | | Thomas-Dehler-Str. 27, 81737 Munich, Germany.
"There is enough for the need of everyone in this world,
but not for the greed of everyone." - Mahatma Gandhi
------------------------------
Date: 10 Mar 1997 00:34:15 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: simple new question!
Message-Id: <5fvku7$3ma$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
sb@en.muc.de writes:
:After all, "0" and "1" aren't far-fetched choices for "false" and "true",
:are they? :-)
But they're wrong. Witness
($false, $true) = (0, 1);
$test = (10 < 5);
if ($test eq $false) { print "no, 10 is bigger than 5\n" }
else { print "yes, 10 is smaller than 5\n" }
Or how about this one
($false, $true) = (0, 1);
$myname = getlogin() || $ENV{USER};
if ($myname == $true) { print "my name is true\n" }
else { print "my name is false\n" }
if ($myname eq $true) { print "my name is true\n" }
else { print "my name is false\n" }
if ($myname == $false) { print "my name is true\n" }
else { print "my name is false\n" }
if ($myname eq $false) { print "my name is true\n" }
else { print "my name is false\n" }
The problem is that
THINGS THAT RETURN FALSE DO NOT ALWAYS RETURN 0
THINGS THAT RETURN TRUE DO NOT ALWAYS RETURN 1
Let true be true and false be false, and do not confuse yourself.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
s = (char*)(long)retval; /* ouch */
--Larry Wall in doio.c from the perl source code
------------------------------
Date: 9 Mar 1997 23:46:45 GMT
From: viet@airmail.net
Subject: Sort question
Message-Id: <viet-0903971752340001@dal36-08.ppp.iadfw.net>
How do I sort a list with elements: ("Dec96", "Nov96", "Jan97", "Feb97",
...) so that the latest the newest (Feb97) would come out first? I checked
a technique called Schwartian Transform but could not figure out how to
make it work with my list. Would somebody please help?
--
------------
Viet Hoang
viet@airmail.net
------------------------------
Date: 9 Mar 1997 23:47:00 GMT
From: Anirvan Chatterjee <anirvan@crl.com>
Subject: Re: Which version of Perl do I have?
Message-Id: <5fvi5k$6km@nexp.crl.com>
-----BEGIN PGP SIGNED MESSAGE-----
Keith Nakanishi <keith.k.nakanishi@boeing.com> wrote:
: How do I determine which version of Perl that is running on our UNIX
: system?
Type "perl -v" from the command line.
_______________________________________________________________
Anirvan Chatterjee . anirvan@crl.com . <URL:http://www.mx.org/>
PGP 0x93C5C165 . finger for PGP/geek . encrypted mail preferred
http://www.mx.org/bookfinder/ : online book comparison shopping
-----BEGIN PGP SIGNATURE-----
Version: 2.6.2
iQCVAwUBMyNL8GTQ0LuTxcFlAQF0pwP9G5hg+rbRSJsZWbfHeAw/NyqMC1KEv/cR
Epq0kk2KUwuzss2pyQWczeWRmaWLCCfkRxCy033TLVMb1vYaRoMdceZ/fObext/Q
HgEMlYr98eNfemWmGNTzZgVOoTrQiQzvMWJME57Mq/07IRVXcPP7K3Rk3dJSOwUA
FM43FkjtlSs=
=XT3H
-----END PGP SIGNATURE-----
------------------------------
Date: 10 Mar 1997 02:08:33 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Which version of Perl do I have?
Message-Id: <5fvqf1$87k$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, Anirvan Chatterjee <anirvan@crl.com> wrote
one line of new data and twenty-one lines of gunk. This is simply silly.
Please be more reasonable.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
If you want your program to be readable, consider supplying the argument.
--Larry Wall in the perl man page
------------------------------
Date: Sun, 09 Mar 1997 22:54:21 GMT
From: dleblanc@mindspring.com (David LeBlanc)
Subject: Re: Who makes more $$ - Windows vs. Unix programmers?
Message-Id: <33233d2e.79103124@news.mindspring.com>
morbius@killspam.net (Morbius) wrote:
>In article <Qn8myVi00iWZ45MJlf@andrew.cmu.edu>, William Taylor Wilson
>> Actually NT's market share in webserving is dropping,
I don't think the numbers support this - Netcraft shows both Apache
and IIS growing, with IIS overtaking NCSA very recently. Apache does
have more share, and is growing more rapidly, but it seems to be at
the expense of NCSA and Netscape.
> I do some consulting work (in my free time) for a consulting company with
>branches in most major US cities. Here is what they charge the customers,
>for the services rendered:
>IBM/Clones/DOS $125/hr
>Mac/OS2/Amiga $145/hr
>Windows 95/NT $145/hr
>Unix/CAD/CAM $165/hr
>Networks/Novell $185/hr
>Proprietary/Vertical $195/hr
>
> This rates do not apply to larger projects, nor do they apply to
>contract/long term services. Those rates tend to be lower. Now, what
>hardware/OS would you like to work on, considering that a substantial
>percentage of the fees is your commision?
It depends on how much work is out there - it doesn't matter how much
per hour if you don't bill many hours. Of course, if there are
unlimited hours of each, it looks like mainframes are a good gig...
David LeBlanc |Why would you want to have your desktop user,
dleblanc@mindspring.com |your mere mortals, messing around with a 32-bit
|minicomputer-class computing environment?
|Scott McNealy
------------------------------
Date: Mon, 10 Mar 1997 01:58:31 GMT
From: bailey766@aol.com (---)
Subject: Re: Who makes more $$ - Windows vs. Unix programmers?
Message-Id: <5fvfhh$br8@dfw-ixnews3.ix.netcom.com>
"James D. Corder" <jimcor@corder.com> wrote:
>In short: Supply and Demand:
>There is more of a demand for Windows people but there
>is a far greater supply than demand. On the other hand
>there is more of a demand for UNIX dudes than there is a
>supply...
Where is this great supply!? We are a shop with 20+ VB/Access/Delphi
programmers and we have had 4 to 5 positions open for half a year now.
Send them all my way, I can use them. There are 3 UNIX people to my
knowledge in our company, and no positions open.
------------------------------
Date: Mon, 10 Mar 1997 01:44:01 GMT
From: Craig Humphrey <humphric@akcity.govt.nz>
Subject: Win32::ODBC & MS SQL Servers IMAGE data type, anyone used it?
Message-Id: <33236761.7ADA@akcity.govt.nz>
Hi People,
I'm playing around with storing web pages in an MS SQL Server (6.5) DB
and retreiving them through Win32::ODBC and Perl 5.001m (build 110) all
on an NT Server (3.51 SP4) platform.
I've manged to work with SQL Server's TEXT data type OK, and a workmate
has retreived an IMAGE, but just how do I insert something of IMAGE type
into the DB?
At the moment I've tried just reading a binary file (gif) into a
variable and then used an INSERT sql statement to add it to the DB, but
it's complaing about quotes. Here's a code snipit:
$Data->Sql("Insert Into Images ( keyref, size, binary ) Values (
$keyref, $inline_length, '0x".$inline."')");
and here's the error message:
Error is 105, [Microsoft][ODBC SQL Server Driver][SQL Server]Unclosed
quote before the character string '0x'., 1
I'm guessing that it's compaining because there will be some
"interesting" chars in the IMAGE field ('binary' field).
According to the SQL Server Transact SQL manual I have to use the
WRITETEXT command, but all the examples they give only ever extract
IMAGE data from one field and insert it into another, never taking
"fresh" IMAGE data from an external data source (ie file).
And I'm not sure that the WRITETEXT command will be compatable with the
Win32::ODBC as it's not standard SQL and use some special text pointer
variable.
Any clues people?
Dave?
Later'ish
Craig
--
usagi@ihug.co.nz | My views and opinions are barely
humphric@akcity.govt.nz | my own, let alone that of my
usagi@ibm.net | employer or ISP!
http://homepages.ihug.co.nz/~usagi | "Come to Butt-Head" - Butt-Head
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 80
************************************
