[13209] in Perl-Users-Digest
Perl-Users Digest, Issue: 619 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 23 07:08:07 1999
Date: Mon, 23 Aug 1999 04:05:10 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 23 Aug 1999 Volume: 9 Number: 619
Today's topics:
Re: Backtracking up through parent directories (Michel Dalle)
Re: Calculating days, hrs, mins between 2 datestamps .. <steve.button@nl.origin-it.com>
Re: Calculating days, hrs, mins between 2 datestamps .. <james.williamson@bbc.co.uk>
calling an executable from a perl script poocus@my-deja.com
calling scripts from other scripts HELP! alghazn@my-deja.com
DBI, fetchrow_array and sorting (mysql) <michael.preminger@jbi.hioslo.no>
How to avoid "Repost from data?" question? <karpat@eeh.ee.ethz.ch>
Re: How to avoid "Repost from data?" question? <flavell@mail.cern.ch>
looking for perl script to upload a file poocus@my-deja.com
Newbie <eve@killerwords.com>
packing a raw UDP packet - Help needed!! <bennycc@pacific.net.sg>
Re: Perl executablles <computers_guy@hotmail.com>
Perl extension - exposing #define equivalents? <pds@datcon.co.uk>
Perl module script (*-*-*G-Lined*-*-*- *-*-*4EvEr*-*-*)
problem with some system calls and passing variables to <rod@killerwords.com>
Re: Request for Comments: www.perl.com (John Stanley)
Re: Request for Comments: www.perl.com (John Stanley)
Re: Request for Comments: www.perl.com (David Cantrell)
Re: Request for Comments: www.perl.com (David Cantrell)
Re: Request for Comments: www.perl.com (David Cantrell)
Re: String to Int <jpeterson@office.colt.net>
Re: system() under Win32 <flavell@mail.cern.ch>
Re: Why use Perl when we've got Python?! <xah@weborder.com>
Re: Why use Python when we've got Perl? <jpeterson@office.colt.net>
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 23 Aug 1999 10:40:43 GMT
From: michel.dalle@usa.net (Michel Dalle)
Subject: Re: Backtracking up through parent directories
Message-Id: <7pr8lo$j18$1@news.mch.sbs.de>
In article <Pine.LNX.4.10.9908211841250.27546-100000@bajan.pct.edu>, Duncan Hill <dhill@sunbeach.net> wrote:
>On Sat, 21 Aug 1999, E. Preble wrote:
>
>> reasons. It's easy to add a substitution call to the script
>> to remove any '..' occurances.
>> $file = s/..//g;
>>
>> Are there other things I should be worried about? Are there
>> other ways to backtrack up through directories like this and
>> grab un-authorized files?
>
>Use a regex to specify what can and cannot be in the file name. If a
>/ is ever present, trunc it, or return an error message, and possibly
>even log it. In fact, the only place a . should ever exist is
>between two alphanumeric characters (assuming you use "standard" file
>names). Therefore, a . at the beginning of the file should be
>illegal.
Ouch. That's NOT true for Unix-type systems (and probably others too).
You can have .profile, .newsrc, etc. as valid filenames there...
And ..whatever also seems to be a valid filename here.
Of course, if you'll always work with known filenames or directories, you can
exclude all others easily.
Michel.
------------------------------
Date: Mon, 23 Aug 1999 08:52:41 +0200
From: "Steve Button" <steve.button@nl.origin-it.com>
Subject: Re: Calculating days, hrs, mins between 2 datestamps ...
Message-Id: <0E16861EE7BCD111BE9400805FE6841F0B10BBEA@c1s5x001.cor.srvfarm.origin-it.com>
TheEadsNet wrote in message
<19990822110812.13887.00002282@ng-cq1.aol.com>...
>
>Does anyone know of a routine that will calculate the number of days,
hours,
>and minutes between two datestamps that consist of:
>
>mm/dd/yyyy-hh:mm
>
>If possible, not a Perl module, since my ISP won't allow me to install
modules
>on my server.
Hello,
First thing that you should try is man gmtime, or perldoc gmtime.
I've done something similar, but I can't remember exactly how at the moment.
It envolved something like
1) taking the "date stamp" and formatting it.
2) using the gmtime (or localtime) function.
3) subtracting the two numbers.
4) converting the difference back into a tm structure.\
In my case it was simpler as I was only comparing two dates, but the idea is
the same.
Sorry to be so fluffy about this but I've got neither my code or docs in
front of me.
If this doesn't help then please let me know and I'll dig out the code for
you.
Regards,
Steve Button.
--
HuntAHome http://www.huntahome.com
Properties throughout the UK and Europe
You can subscribe to receive a free daily email of all properties that match
your requirements (location, price, bedrooms)
You can advertise your property, with photograph, for free.
------------------------------
Date: Mon, 23 Aug 1999 11:40:31 +0100
From: "James Williamson" <james.williamson@bbc.co.uk>
Subject: Re: Calculating days, hrs, mins between 2 datestamps ...
Message-Id: <7pr8ho$83r$1@nntp0.reith.bbc.co.uk>
TheEadsNet wrote in message
<19990822110812.13887.00002282@ng-cq1.aol.com>...
>
>Does anyone know of a routine that will calculate the number of days,
hours,
>and minutes between two datestamps that consist of:
>
>mm/dd/yyyy-hh:mm
>
>If possible, not a Perl module, since my ISP won't allow me to install
modules
>on my server.
>
>Much thanks.
>
>Joe Halbrook
>
Are they really going to know if you upload a few modules into your
directory?
James Williamson
------------------------------
Date: Mon, 23 Aug 1999 10:29:54 GMT
From: poocus@my-deja.com
Subject: calling an executable from a perl script
Message-Id: <7pr7qr$pq2$1@nnrp1.deja.com>
I'm new to perl so please be gentle with me.
My appologies to my previous messages for being vague.
The problem:
I have a perl script that runs using an oracle perl cartridge on a web
server.
Code below
$pair = $ENV{'QUERY_STRING'};
($name, $value) = split /[0-9]/, $pair;
$auditlen = length($name);
substr($pair,0,$auditlen) = "";
$value=$pair;
if($name eq "auditid")
{
#Send the message to kill the audit
$errormessage = system ("/cdvu/bin/CdvuSendMessage 3 $value");
}
The code in CdvuSendMessage takes the parameters and writes them to a
named pipe, the named pipe then invokes a procedure to kill a process
and amend a number of variable values relating to an audit.
The code in CdvuSendMessage is written in C (by somebody else) and can
not be ammended.
The perl script that I have is invoked when a button on a web page is
pressed, but it does not work, nothing happens.
I have tried the code from the command line & it runs perfectly.
The value returned by system() is 256.
I have been told that it may be something to do with the fact that
CdvuSendMessage is at somepoint writing to a file and this can not be
done in the cgi-bin. If this is the cause of the problems is there a
workaround?
I hope I have supplied enough information to solve this problem, if not
please add a message to say what extra is needed.
Thankyou
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 23 Aug 1999 09:06:45 GMT
From: alghazn@my-deja.com
Subject: calling scripts from other scripts HELP!
Message-Id: <7pr2v2$mom$1@nnrp1.deja.com>
Can someone guide me here please?
What I want to do is call one of my scripts (myscript.cgi) from my main
script (mainscript.cgi) and pass it some arguments $A and $B
Tried system("perl myscript.cgi $A $B"); from within mainscript.cgi but
it doesn't work!
What happens is that myscript.cgi gets called without arguments.
Can someone help?
(have posted a near duplicate post elsewhere but since it was my first
got sidetracked in the registration process and now can't locate it..)
If its OK to ask a cgi related question here, I'd also appreciate an
answer to a very basic cgi question.
Can HTTP_REFER can be faked , for example, by
myscript.cgi?A=blah&&HTTP_REFER=mypage , or is it safe to use it as a
kind of password for deeper access into a site (meaning only the browser
can set it?
thanks,
ghaznavi
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 23 Aug 1999 09:58:35 +0100
From: Michael Preminger <michael.preminger@jbi.hioslo.no>
Subject: DBI, fetchrow_array and sorting (mysql)
Message-Id: <37C10D3B.E9B1FD02@jbi.hioslo.no>
Hei!
I am using perl DBI against a mysql database, and fetching a set of
record from the database ordered.
I use the construct:
$IndexedDocs=$dbh->prepare("select Document_inc_id from
Term_indexes_Document where Term_inc_id=$old_n order by Document_inc_id
");
$IndexedDocs->execute;
while (@doc_id=$IndexedDocs->fetchrow_array){
$tmpTermEntry.="$doc_id[1] ";
}
To my surprize the list I get has lost the sorting imposed by the select
call. Trying to run the same call directly against the base retains the
sorting.
Question:
Why do I lose the sorting the way I implement it, and how do I retain
the sorting within DBI
--
Michael Preminger
Forsker / Research Scientist
Avdeling for journalistikk,
bibliotek- og informasjonsfag /
Faculty of Journalism, Library and
Information Science
Høgskolen i Oslo / Oslo College
http://www.hioslo.no/~michaelp
Pilestredet 52, N-0167 Oslo
Voice: +47-22452778
Fax: +47-22452605
E-mail: michael.preminger@jbi.hioslo.no
------------------------------
Date: Mon, 23 Aug 1999 12:26:35 +0200
From: Andrei Karpatchev <karpat@eeh.ee.ethz.ch>
Subject: How to avoid "Repost from data?" question?
Message-Id: <37C121B8.422B76DB@eeh.ee.ethz.ch>
Salue, everybody!
If I have an on-fly document (result of some "form" with POST method),
which user leaves and then comes back with aid of the browsers button
"Back"... The browser asks then "Repost from data?". Is it possible
somehow to avoid this question, is there some special HTML-Tag or
something else?
Thanks.
------------------------------
Date: Mon, 23 Aug 1999 12:38:20 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: How to avoid "Repost from data?" question?
Message-Id: <Pine.HPP.3.95a.990823123158.22841E-100000@hpplus03.cern.ch>
On Mon, 23 Aug 1999, Andrei Karpatchev wrote:
> If I have an on-fly document (result of some "form" with POST method),
> which user leaves and then comes back with aid of the browsers button
> "Back"... The browser asks then "Repost from data?".
I think you mean "repost form data?"
> Is it possible
> somehow to avoid this question,
As a general rule, don't use POST for idempotent transactions.
For non-idempotent transactions, the dialog is a valuable safety feature
to prevent duplicate transactions: you don't want to avoid it. It might
be useful to review the cacheability of the response, however. See
http://www.mnot.net/cache_docs/ and
http://vancouver-webpages.com/CacheNow/
This was not a Perl language question. Please raise this kind of
question on the CGI group (f'ups set)
------------------------------
Date: Mon, 23 Aug 1999 10:45:40 GMT
From: poocus@my-deja.com
Subject: looking for perl script to upload a file
Message-Id: <7pr8oj$qfr$1@nnrp1.deja.com>
I'm looking for a perl script that can be used for uploading a file?
any suggestions as to where i might get one are welcomed.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 23 Aug 1999 01:52:24 -0700
From: "Eve" <eve@killerwords.com>
Subject: Newbie
Message-Id: <rs23b2kl5u256@corp.supernews.com>
Having a problem getting perl to input to a program that I want to run from
the script.
example: I want to call "htpasswd -c .htpasswd $user"
however htpasswd wants you to input the password and then confirm it and you
cant do it from the command line. so I tried
open(HTPASS, "|htpasswd -c .htpasswd $user");
print HTPASS "$pass";
print HTPASS "$pass";
close (HTPASS);
didnt werk and have tried everything I can think of ... can someone please
help me?
Thanks in advance,
Rod
rod@killerwords.com
------------------------------
Date: Mon, 23 Aug 1999 15:01:50 +0800
From: benny chee <bennycc@pacific.net.sg>
Subject: packing a raw UDP packet - Help needed!!
Message-Id: <37C0F1DE.1F1E0474@pacific.net.sg>
Hi,
I was trying to pack a raw UDP packet, and it was not quite
successful.
I specified that the header length be 20 bytes, but it came out to
be 24 bytes.
With the options specified as well, which i did not specify at all.
Anywhere here's the sample code.
Hope u will help.
Benny
bennycc@pacific.net.sg
----------------------------
use Socket;
my $IPee = '192.168.10.2'; #Destination IP
my $SIPee = '192.168.10.1'; #Source IP
my $data = 'help me!';
&socketeer ($data);
sub rawdata {
my ($data) = @_;
my $UDPLength = 8 + length($data);
my $IPversion = "4"; #IP version 4
my $headerLength = "5"; #number of 32-bit words in ip header
my $versionAndHeaderLength = $IPversion.$headerLength; #pack them
together
my $typeOfService = "00"; #IP type of service
my $totalLength = $UDPLength + 20; #udp + 20 byte IP header
my $fragmentation = "31173"; # Elite - 2 bytes as well
my $flag = "010"; #IP fragmentation flags 3 bits
my $fragmentOffset = "0000000000000"; #fragment offset
my $flagsAndFragmentOffset = $flag.$fragmentOffset;
my $TTL = "64"; #64 seconds or hops
my $protocol = "17"; #/etc/protocols udp is 17
my $headerChecksum = 0;
my $sourceIP = (gethostbyname($SIPee))[4];
my $destIP = (gethostbyname($IPee))[4];
my $sourcePort = "9999";
my $destPort = "53";
my $zero = 0;
# UDP include a 12-byte pseudo-header with the UDP datagram
# just for checksum computation
my $pseudoUDP = pack('a4 a4 C C n',
$sourceIP, #a4
$destIP, #a4
$zero, #C
$protocol, #C
$UDPLength); #n
my $UDPChecksum = &checksum($pseudoUDP);
my $hdr = pack ('H2 H2 n n B16 C2 n a4 a4 n n n v A*',
$versionAndHeaderLength, #H2
$typeOfService, #H2
$totalLength, #n
$fragmentation, #n
$flagsAndFragmentOffset, #B16
$TTL, #C
$protocol, #C
$headerChecksum, #n
$sourceIP, #a4
$destIP, #a4
$sourcePort, #n
$destPort, #n
$UDPLength, #n
$UDPChecksum, #v
$data); #a*
return $hdr;
}
sub checksum {
my ($pseudo) = @_;
my $lenMsg; # length of pesudo
my $numShort; # Number of short words in the pesudo
my $short; # one short word
my $check;
$lenMsg = length($pseudo);
$numShort = $lenMsg/2;
$check = 0;
foreach $short (unpack("S$numShort",$pseudo)) {
$check += $short;
}
$check += unpack("C",substr($pseudo,$lenMsg-1,1)) if $lenMsg%2;
$check = ($check>>16)+($check&0xffff);
return(~(($check>>16)+$check)&0xffff);
}
sub socketeer {
my ($data) = @_;
my $destPort ="31337";
my $destIP = (gethostbyname($IPee))[4];
my $PROTO_RAW = 255; #/etc/protocols
my $PROTO_IP = 0;
my $IP_HDR = 1;
$| = 1; #flush!
#beam me up scottie!
socket(S,AF_INET,SOCK_RAW,$PROTO_RAW) || die $!;
setsockopt(S,$PROTO_IP,$IP_HDR,1);
my $dest = pack('S n a4 x8',
AF_INET,
$destPort,
$destIP);
defined(send(S,rawdata($data),0,$dest)) || die "send $IPee: $!";
}
------------------------------
Date: Mon, 23 Aug 1999 14:26:09 +0800
From: Funny Guy <computers_guy@hotmail.com>
Subject: Re: Perl executablles
Message-Id: <37C0E980.917B948F@hotmail.com>
Visit http://www.perl2exe.com/
You can find the answer.
Derek wrote:
> Hi all,
>
> I would like to compile a number of perl scripts in to a number of EXE's to be
> run on a DOS based system (Win95/98 NT command window).
>
> I have a number of utils that I want to be able to send to clients but I don't
> want to have to have them install Perl (they would get them selves in to
> trouble) and I don't want any one to mess with the code of the utils, it would
> get them in to more trouble.
>
> Does anyone know if there is a product out there that will do what I need. I
> have looked at active perl but though they have this PerlEx product that is not
> what I need at all.
>
> Regards
>
> Derek
------------------------------
Date: Mon, 23 Aug 1999 10:35:16 +0100
From: "Paul D.Smith" <pds@datcon.co.uk>
Subject: Perl extension - exposing #define equivalents?
Message-Id: <7pr4k9$h3g$1@soap.pipex.net>
All,
I have written a Perl extension for Perl-Win32 which allows me to access
some library functions. I would like to expose some 'C' "#defines" which
can then be passed as arguments within Perl but I'm not sure how. How do I
do this in the most common Perl manner? For example if I have the following
'C':
#define PDS_DEFINE_1 0x0001
How do I expose this to Perl so that I can call...
&pds_function(...,..., PDS_DEFINE_1,...);
Example codefrags from a PM or CPP extension source file would be greatly
appreciated - or a pointer to some is fine.
Thanks,
Paul DS.
P.S. Could you also copy me at pds-nospam@datcon.co.uk (remove the
"-nospam") please?
------------------------------
Date: Mon, 23 Aug 1999 04:17:33 -0400 (EDT)
From: Global-_K-Line@webtv.net (*-*-*G-Lined*-*-*- *-*-*4EvEr*-*-*)
Subject: Perl module script
Message-Id: <8839-37C1039D-44@newsd-153.iap.bryant.webtv.net>
Does Anyone have a Net::irc io::sockets:: script to connect to an irc
server like a bot?? if so please e-mail me with iut Thanx !!
------------------------------
Date: Mon, 23 Aug 1999 03:04:09 -0700
From: "Rod" <rod@killerwords.com>
Subject: problem with some system calls and passing variables to them.
Message-Id: <rs27hmf35u242@corp.supernews.com>
Having a problem getting perl to input to a program that I want to run from
the script.
example: I want to call "htpasswd -c .htpasswd $user"
however htpasswd wants you to input the password and then confirm it and you
cant do it from the command line. so I tried
open(HTPASS, "|htpasswd -c .htpasswd $user");
print HTPASS "$pass";
print HTPASS "$pass";
close (HTPASS);
didnt werk and have tried everything I can think of ... can someone please
help me?
Thanks in advance,
Rod
rod@killerwords.com
P.S. Sorry for sloppy code, I am still a little new to this ...
------------------------------
Date: 23 Aug 1999 06:05:37 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <7pqobh$rv9$1@news.NERO.NET>
In article <slrn7rudu7.c9p.abigail@alexandra.delanet.com>,
Abigail <abigail@delanet.com> wrote:
>John Stanley (stanley@skyking.OCE.ORST.EDU) wrote on MMCLXXX September
>MCMXCIII in <URL:news:7pjoal$5mo$1@news.NERO.NET>:
><> In article <Pine.HPP.3.95a.990820141043.20918E-100000@hpplus03.cern.ch>,
><> Alan J. Flavell <flavell@mail.cern.ch> wrote:
><> >What the heck do you think you mean, "sites designed specifically with
><> >lynx in mind". If a site is designed _for_ the WWW, then Lynx is not
><> >excluded.
><>
><> That is not true. There is a big difference between designing a hot web
><> site and doing it with text browsers in mind. The number of sites
><> that do nothing at all without having javascript in yor browser are
><> growing every day, and forgetting to have ALT text for images is common.
><> So is the use of an imagemap as the only navigation method.
>
>And your point is?
Exactly what it looks like. The statement I quoted is not true.
>Just because there are so many ignorant and incompetent
>"web designers" out there doesn't mean that "designing for the WWW"
>excludes text and speech browsers.
Just because so many people in England drive on the left side of the
street doesn't mean that they don't drive on the right.
>Any site that requires you to use a
>browser that displays images and/or does javascript isn't a WWW site;
While you and I might believe this to be true, most of the rest of the
world does not.
>no matter how many times you say so.
You are right on this point: web sites rarely ask me if they are a web
site, so it doesn't matter how many times I say they are not. I almost
never tell someone they are running a web site, so "how many times I say
so" is 0.
------------------------------
Date: 23 Aug 1999 06:12:10 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <7pqonq$s8k$1@news.NERO.NET>
In article <37C03BF2.579A960D@shivan.com>,
Jacque Donahue <cis78.11@shivan.com> wrote:
>I agree with Abigail.
Good for you. So do I, I think, except I don't agree that she should be
arguing with me about this.
>We're not just talking Lynx users.
Except that what I replied to WAS talking about lynx, and I pointed out
the mistake in saying that lynx was not being excluded from "for the
WWW" designs. I've also pointed out that people who browse without images
or java enabled are excluded, so getting your knickers in a knot because
you feel left out is silly.
>> And your point is? Just because there are so many ignorant and incompetent
>> "web designers" out there doesn't mean that "designing for the WWW"
>> excludes text and speech browsers.
Except that it is very common. Designing cars doesn't mean that you
paint them red, but there are a lot of red cars on the road.
------------------------------
Date: Mon, 23 Aug 1999 08:59:58 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <37c10c1e.2134869@news.insnet.net>
On 20 Aug 1999 14:22:13 GMT, stanley@skyking.OCE.ORST.EDU (John
Stanley) said:
>Alan J. Flavell <flavell@mail.cern.ch> wrote:
>
>>What the heck do you think you mean, "sites designed specifically with
>>lynx in mind". If a site is designed _for_ the WWW, then Lynx is not
>>excluded.
>
>That is not true. There is a big difference between designing a hot web
>site and doing it with text browsers in mind. The number of sites
>that do nothing at all without having javascript in yor browser are
>growing every day, and forgetting to have ALT text for images is common.
>So is the use of an imagemap as the only navigation method.
Those sites are not designed for the WWW (I can't view them using
Hotjava, !Browse, or Netpositive, for example). They have been
designed for IE and/or Netscape.
This is an eeeevil habit.
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: Mon, 23 Aug 1999 09:03:31 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <37c20e50.2696096@news.insnet.net>
On 23 Aug 1999 06:05:37 GMT, stanley@skyking.OCE.ORST.EDU (John
Stanley) said:
>Just because so many people in England drive on the left side of the
>street doesn't mean that they don't drive on the right.
Huh? Can someone translate that into English?
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: Mon, 23 Aug 1999 09:22:32 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <37c3102b.3171640@news.insnet.net>
On Fri, 20 Aug 1999 17:53:30 +0200, "Alan J. Flavell"
<flavell@mail.cern.ch> said:
> We see, to take just one example of many, that
>extra effort has been spent on turning a bulleted list, badly, into a
>series of lines that, in HTML terms, stand in no particular relationship
>to each other, and then putting graphical bullets in front of them in
>order to give a visual impression of a bulleted list...
ROFL! Haven't they heard of style sheets? Here's an extract from one
of my pages, which replaces the default bullet symbol with tiny icons
appropriate to the type of item being listed. It degrades gracefully.
<STYLE><!--
LI.java
{ list-style: url("http://myserver/mydir/java-icon.gif") disc }
LI.perl
{ list-style: url("http://myserver/mydir/perl-icon.gif") disc }
--></STYLE>
<P>A few java links ...
<UL>
<LI CLASS=java><A HREF=java-thingy>Java thingy</A>
<LI CLASS=java><A HREF=other-java-thingy>Other Java thingy</A>
</UL>
<P>A few perl links ...
<UL>
<LI CLASS=perl><A HREF=perl-thingy>Perl thingy</A>
<LI CLASS=perl><A HREF=other-perl-thingy>Other Perl thingy</A>
</UL>
>Don't get me wrong: I have nothing against a web page that is visually
>attractive on a graphical browser. I just don't think it's a good idea
>to spend effort on doing that in ways that are detrimental to the
>general accesibility of a WWW document.
That's why style sheets were introduced. They seperate presentation
from content.
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
Date: Mon, 23 Aug 1999 07:51:01 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: String to Int
Message-Id: <F37w3.224$u07.1770@news.colt.net>
Abigail <abigail@delanet.com> wrote:
> Daniel M. Phiffer (dphiffer@orion.ac.hmc.edu) wrote on MMCLXXVIII
> September MCMXCIII in <URL:news:7pdp71$qqt$1@nntp1.interworld.net>:
> "" I have a beginner's question: how do I convert from a string to an
> "" int? (i.e. "32" compared to 32) Thanks.
> You'd write an XS module that calls 'atoi' for you, and you link
> in the resulting library.
I think that would be more overhead than is really necessary. Generally
speaking Perl will do the conversion implicitly where it makes sense.
N.B. Your notions of sense should be adjusted to fit Perl at this point :)
------------------------------
Date: Mon, 23 Aug 1999 12:05:40 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: system() under Win32
Message-Id: <Pine.HPP.3.95a.990823120443.22841C-100000@hpplus03.cern.ch>
On Sun, 22 Aug 1999, John M. Dlugosz wrote:
> First of all, you don't have to assume what OS I'm using because the
> "Subject" line says "system() under Win32".
Are you asserting that there is no difference between Win95/98, WInNT,
maybe even Win2000?
------------------------------
Date: Mon, 23 Aug 1999 03:48:10 -0700
From: "xah" <xah@weborder.com>
Subject: Re: Why use Perl when we've got Python?!
Message-Id: <37c126a6$0$813@newsreader.alink.net>
Tom Christiansen wrote in message <37b414d7@cs.colorado.edu>...
> [courtesy cc of this posting mailed to cited author]
>
>Legibility is purely subjective.
>
>How legible do you find Greek, Arabic, Russian, or Chinese? And what
>does the character set actually have to do with any inherent complexity
>of the grammar or richness of expressive vocabulary?
>
>Answer: nothing whatsoever.
I'd like to extend what Tom Chrisiansen has said.
Have you ever glanced at a graduate math text? It's probably all Greeks to
you. However, if someone in the know who translated all the symbolism to
plain English, then it becomes legible. It really depends on who's doing the
reading. If you are a math guy, then perhaps symbols is your thing. Most of
us would prefer English. Legibility is purely subjective.
However, the ivy tower class of buttheads insist on symbolism for math,
clinging to the fancy that certain ideas are better expressed in certain
language. They created a whole barrier of entry. You couldn't believe what
kind of perverted use of symbols they invent. I know because I've been there
a bit. Their one-language ideology taints our programing world. If you
wonder why so many languages uses weird syntax (e.g. python, dylan, lisp,
haskell, mercury, mathematica ...ad nausea), you have these guys to thank
to.
I like Perl because it offers freedom and accessibility to imbeciles like
myself. It lets me fuck around, and have my say. I can sit and spin on the
whole established human wisdom. If someone cannot read my code, it is their
shortcoming. As Tom has said in other posts, freedom is a feature. And if
one day I am tired of Larry's Perl, I can fork my own version/vision. (Larry
said it is OK, and in fact encourages forking.)
On a personal note... Do you know what a computer science degree is these
days? They require you understand shits like lambda calculus, logic, graph
theory, combinatorics, or even algorithms?? All for what? All the Perl
programers I know doesn't understand any of these, and they all are making
big bucks in fortune 500. I'm not ashamed that I dropped out of school. I
hope that Larry and Tom's teachings will eventually make such subjects
disappear for good.
My humble $0.02.
Xah
xah@best.com
http://www.best.com/~xah/PageTwo_dir/more.html
"Your nonsense is no better than mine." --Mathematician of metaland.
------------------------------
Date: Mon, 23 Aug 1999 07:46:54 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: Why use Python when we've got Perl?
Message-Id: <O%6w3.223$u07.1770@news.colt.net>
In comp.lang.perl.misc Shannon Watters <watterss@pilot.msu.edu> wrote:
> Xah <xah@best.com> wrote in message news:37bfe42c$0$221@nntp1.ba.best.com...
> >
> > Perl wouldn't be a nice community without bad asses like Tom Christensan,
> > Chris Nador and some other regulars I don't want to mention now. We thrive
> It's easy to act like a tough guy over the net, isn't it?
Hell yeah - I mean, err, why else does anyone read c.l.p.m ?
Remind me to start a bot that autoemails people the contents of:
http://www.5sigma.com/perl/topten.html
preferably still in HTML format. Now that I think of it the worst part of the
new www.perl.com site is that it includes a pointer to c.l.p.m. without an
attached health warning. And, amusingly, a search for 'perl community' turns
up precisely no documents. Well well well.
[runs off to his friendly London Perl Mongers group for sanity and useful help]
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
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" from
almanac@ruby.oce.orst.edu. The real FAQ, as it appeared last in the
newsgroup, can be retrieved with the request "send perl-users FAQ" from
almanac@ruby.oce.orst.edu. 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" from
almanac@ruby.oce.orst.edu.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V9 Issue 619
*************************************
