[12489] in Perl-Users-Digest
Perl-Users Digest, Issue: 6089 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jun 22 10:07:20 1999
Date: Tue, 22 Jun 99 07:00:25 -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, 22 Jun 1999 Volume: 8 Number: 6089
Today's topics:
[Q-NT-Win32] Traverse all services on multiple machines mitiste@charlie.iit.edu
Re: A buggy intersection-method (Greg Bacon)
Re: A general programming question <martin@adoma.se>
Re: Apache + Perl <craig@mathworks.com>
Re: Apache + Perl <dave@dave.org.uk>
Re: Array elements <craig@mathworks.com>
Re: Beginner Perl Question <gellyfish@gellyfish.com>
Re: can you split a word into letters? (Bart Lateur)
Re: Database Manipulation <craig@mathworks.com>
Re: Database Manipulation <dave@dave.org.uk>
Re: fork on NT (Scott McMahan)
Re: fork on NT <randy@theory.uwinnipeg.ca>
How to "Save as" a File ? <ex5316@netvigator.com>
Re: How to "Save as" a File ? <dave@dave.org.uk>
Re: how to do this in a perl program <fty@utk.edu>
Re: how to test pl scripts.? <dave@dave.org.uk>
Re: Interpreting MS-ASCII - anyone have a filter? <dickey@shell.clark.net>
Re: mod_perl and resources <craig@mathworks.com>
Re: mod_perl and resources <garethr@cre.canon.co.uk>
Re: mod_perl references <fty@utk.edu>
Re: mod_perl references (Bart Lateur)
Re: Need help with a perl/cgi workaround <fty@utk.edu>
Re: Question about writing to a file in perl.. <dave@dave.org.uk>
Recursive Delete (Joe)
Re: Searching for RegEx in binary files (Bart Lateur)
Re: simple requirement..help please! <bjoern.teegen@gmx.de>
Re: Statistics for comp.lang.perl.misc (Greg Bacon)
Sub Routines Question, Parameters <gte482i@prism.gatech.edu>
Sybperl bcp initialization jerbyr@my-deja.com
Re: Upload Module? <dave@dave.org.uk>
Re: uploading by browser <dave@dave.org.uk>
Re: What is First line in Perl5 in Sun Micro... (Michael Stevens)
Re: What is First line in Perl5 in Sun Micro... (Lack Mr G M)
Re: What is First line in Perl5 in Sun Micro... <kperrier@blkbox.com>
Re: What is First line in Perl5 in Sun Micro... <craig@mathworks.com>
Re: When is Sybperl a good choice mpeppler@mbay.net
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 22 Jun 1999 13:41:55 GMT
From: mitiste@charlie.iit.edu
Subject: [Q-NT-Win32] Traverse all services on multiple machines ?!?
Message-Id: <376f9206.65385299@news.usenetserver.com>
Does anybody have an idea on how to traverse a list of all
PDCs in a multiple resource domains, and change the password on ALL
services relying on a specific account (e.g. administrator)?
TIA,
Stefan
------------------------------
Date: 22 Jun 1999 13:51:16 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: A buggy intersection-method
Message-Id: <7ko4ck$lg$4@info2.uah.edu>
In article <377649af.3690026@news.skynet.be>,
bart.lateur@skynet.be (Bart Lateur) writes:
: Oh. That reminds me. I've tried this:
:
: {
: local *ARGV;
: @ARGV = ('/some/file');
: while(<>) {
: ...
: }
: }
:
: but I noticed that localizing the filehandle ARGV (which was part of
: what I wanted) mad it loose it's magic properties. I guess that by
: default, ARGV is a tied handle, and no longer if localized. I just
: thought I'd mention this.
Apparently it has something to do with localizing the typeglob. This
works (on Linux, at least):
#! /usr/bin/perl -w
use strict;
{
local @ARGV = 'ps auxww |';
while (<>) { print }
}
Greg
--
Kenny: hmm-hmm hmm hmm hmm hmm hmm-hmm!
Stan: Dude, how'd you know she has a cat?
------------------------------
Date: Tue, 22 Jun 1999 15:03:14 +0100
From: "Martin Quensel" <martin@adoma.se>
Subject: Re: A general programming question
Message-Id: <7ko2oe$gjc$1@zingo.tninet.se>
Shaulmert skrev i meddelandet <7kn5ug$v8t$1@nnrp1.deja.com>...
>Hello,
>I am using ASP, but my question is a bit more general: I have to manage
>HUGE amounts of data. what would be faster
>for the server to do, dig it in and out of database tables, or in and
>out of text files?
>Also- what would be faster, to separate the data into many different DB
>tables or text files, or to create one very long DB/text file? the
>assumption is that if it will be separated, the CPu will have to handle
>about six to ten actions in different files as oppose to the same amount
>of actions on one long file?
>
>Your insights will be greatly appreciate.
>
>Please reply to olmert@netvision.net.il
>
>Thanks!
Well, its not a perl question.....
But let me say it like this..
I can program a 3d games engine....
I can make it really slow (witch it would be, if i made it) or really fast!
It depends on the programmer. if i use arrays with stored values, and
iterate over them to retrive data, or if i use a hash..see the diffrence?
both methods work just fine, but one is faster than the other..
If i am a really lousy programmer, i can make the computer come to a
grinding halt, when i want it to compare two text files, the language
doesent matter.
How good are you in perl??
How good do you think most of the people in comp.lang.perl.misc are when it
comes to ASP??
------------------------------
Date: Tue, 22 Jun 1999 08:41:36 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: Apache + Perl
Message-Id: <376F8480.9FAB636C@mathworks.com>
ivanwalsh@my-deja.com wrote:
> Hello All,
>
> **newbie - please be patient **
>
> My question is, will setting up Apache on my workstation effect Windows
> on any way. In other words can they both be installed on the same
> machine without destroying each other.
>
I don't see what this actually has to do with Perl, but, Apache will not
effect Windows.
Craig
------------------------------
Date: Tue, 22 Jun 1999 14:25:26 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: Apache + Perl
Message-Id: <376F8EC6.43CE5A12@dave.org.uk>
ivanwalsh@my-deja.com wrote:
>
> Hello All,
>
> **newbie - please be patient **
>
> I want to test Perl on my Win98 workstation at home and have read that
> I can use ActivePerl for the Perl installation and Apache for the
> server site.
>
> My question is, will setting up Apache on my workstation effect Windows
> on any way. In other words can they both be installed on the same
> machine without destroying each other.
Apache is an application. It runs under Windows. Why would it affect
Windows? Or vice versa?
You won't have any problems.
Dave...
------------------------------
Date: Tue, 22 Jun 1999 08:36:30 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: Array elements
Message-Id: <376F834E.EEDDEC0D@mathworks.com>
John Savage wrote:
> #!/usr/bin/perl
> #test script
> #List shell commands
> use Shell qw(ls cp);
> #Put the file list into an array
> @file_list_array = (ls "/status/html");
> #Loop thorough the directory list forever
> for (;;) {foreach $file_list_array (@file_list_array)
> {cp $file_list_array, "/tmp/index.html"; sleep ("20");};}
>
> How do I go about calling the array elements as file names?
>
John,
The output from "ls" contains new lines which will cause your copy to fail. So
you should
remove trailing new lines from $file_list_array like this:
foreach $file_list_array (@file_list_array) {
$file_list_array =~ s/\n$//;
cp $file_list_array, "/tmp/index.html"; sleep("20");
}
Hope this helps.
Craig
------------------------------
Date: 22 Jun 1999 14:33:59 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Beginner Perl Question
Message-Id: <376f90c7@newsread3.dircon.co.uk>
John Paopeng <ppjohn@ncs.com.sg> wrote:
> Howie wrote:
>>
>> Is it possible to execute a script every 2 hours ( I need to delete cached
>> files) using Perl or a CGI script? Or would I have to use a complete different
>> language?
>> thanks
>
> if you run it under Unix, you can use the system call "date"
> $_ = `date`;
> The result of "date" command will be assigned to special variable $_
> and from here you can just use string matching...etc.. to manipulate the
> string $_
> From there you will get the time and make you program do some task every
> 2 hours.
>
A) whats wrong with using Perl's builtin localtime()
B) If you are on Unix anyway why not use cron ...
/J\
--
"Over the years I've always had Max Factor in my box" - Tina Earnshaw,
Chief Make-Up Artist, Titanic
------------------------------
Date: Tue, 22 Jun 1999 12:13:24 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: can you split a word into letters?
Message-Id: <376f7d10.6091621@news.skynet.be>
Weborium wrote:
>Since a single word doesn't have any delimiter, is there a way to split it up
>into letters, or pull out a single letter?
$_ = "Lot's of letters";
@letters = /([a-zA-Z])/g;
print join ' - ', @letters;
You did say "letters", didn't you? :-)
Bart.
------------------------------
Date: Tue, 22 Jun 1999 08:26:30 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: Database Manipulation
Message-Id: <376F80F6.C7869E54@mathworks.com>
paulm@dirigo.com wrote:
> The forecast is currently only viewable. I want to right a script that
> will grab all the values that the "view" script pulled out of the
> database and put them into a text box. Then I can set the script up to
> use an SQL string (UPDATE) to update the sales forecast.
>
> Pretty simple right? Well, if you know please give me a hint :)
Have you tried anything? Do you have a specific question??
I'll be glad to try and answer any questions you may have.
Craig
------------------------------
Date: Tue, 22 Jun 1999 14:33:57 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: Database Manipulation
Message-Id: <376F90C5.C0AE921C@dave.org.uk>
paulm@dirigo.com wrote:
>
> I currently have a internal website that runs a perl script that will
> pull that values of a sales forecast from our database into a dynamic
> web page via DBI and an SQL string. What I want to do now is give the
> sales people the ability to edit their specific forecasts via the web.
>
> The forecast is currently only viewable. I want to right a script that
> will grab all the values that the "view" script pulled out of the
> database and put them into a text box. Then I can set the script up to
> use an SQL string (UPDATE) to update the sales forecast.
>
> Pretty simple right? Well, if you know please give me a hint :)
Sounds simple enough. What was your question?
Dave...
------------------------------
Date: Tue, 22 Jun 1999 12:22:54 GMT
From: scott@aravis.softbase.com (Scott McMahan)
Subject: Re: fork on NT
Message-Id: <yeLb3.279$Df.21343@newshog.newsread.com>
Philip DiFalco (phlippy@bellatlantic.net) wrote:
> when will fork() be available on NT?
The UNIX fork() call is impossible on NT because of differences in the
process model between the operating systems. NT can't fork(). I discuss
why in my book, coming out in August.
Some runtime systems now have fork(), but to use it you normally have
to use the runtime system and give up being a native Win32 program.
I am interested to see if this will be the case with the native
Perl interpreter.
Scott
------------------------------
Date: Tue, 22 Jun 1999 08:32:24 -0500
From: "Randy Kobes" <randy@theory.uwinnipeg.ca>
Subject: Re: fork on NT
Message-Id: <7ko3lp$hro$1@canopus.cc.umanitoba.ca>
Philip DiFalco <phlippy@bellatlantic.net> wrote in
message news:376F1F2F.D8FE8500@bellatlantic.net...
> when will fork() be available on NT?
>
Hi,
It's available using the cygwin tools from
http://www.cygnus.com/. Also, though, the recently
announced collaboration between Microsoft
and ActiveState (http://www.activestate.com/,
under Press releases) has as one of its goals
an implementation of fork. An alpha version
is scheduled for late June.
best regards,
Randy Kobes
--
Physics Department Phone: (204) 786-9399
University of Winnipeg Fax: (204) 774-4134
Winnipeg, MB R3B 2E9 http://theory.uwinnipeg.ca/
Canada randy@theory.uwinnipeg.ca
------------------------------
Date: Tue, 22 Jun 1999 20:48:46 +0800
From: Alex <ex5316@netvigator.com>
Subject: How to "Save as" a File ?
Message-Id: <376F862D.DA7F8C44@netvigator.com>
Hi all,
I have a question in Perl programming:
I have a file with the filename test.html under a directory.
How can I create a file (by perl script) with the filename visitor1.html
(actually the contents is exactly same as test.html - like the "file
save as - visitor1.html" function !)
Thank you
Alex
------------------------------
Date: Tue, 22 Jun 1999 14:26:57 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: How to "Save as" a File ?
Message-Id: <376F8F21.C9166122@dave.org.uk>
Alex wrote:
>
> Hi all,
> I have a question in Perl programming:
> I have a file with the filename test.html under a directory.
> How can I create a file (by perl script) with the filename visitor1.html
> (actually the contents is exactly same as test.html - like the "file
> save as - visitor1.html" function !)
use File::Copy;
hth,
Dave...
------------------------------
Date: Tue, 22 Jun 1999 13:14:42 +0000
From: Jay Flahertry <fty@utk.edu>
Subject: Re: how to do this in a perl program
Message-Id: <376F8C42.8FDBA38D@utk.edu>
Jim Bell wrote:
> Hi, all,
>
> How can I do something like this in a perl CGI program:
>
> #,,, blah,blah
> when a user hits the submit button, the corresponding
> cgi program will take the user to a page which says
> " This will take about ten minutes, please wait..." immediately.
> At the same time, the cgi program works some data processing.
> and when it's done it will bring the user to
> another page which shows the results.
>
This is an http type question. Go to one of the web server NG's and ask
about NPH (Non-Parsed Headers). You will also have to unbuffer your
output ($|++). Check out the NPH examples from CGI.pm docs
--
Take care of your shoes...jay
fty@utk.edu
------------------------------
Date: Tue, 22 Jun 1999 14:53:14 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: how to test pl scripts.?
Message-Id: <376F954A.1FEED815@dave.org.uk>
ivanwalsh@my-deja.com wrote:
>
> Forgive this question (we all begin somewhere)
>
> but if I want to install Linux or Apache, do I
> have to uninstall Windows 98. Somehow I was under
> the impression that you could not have Win98 and
> Linux on the same workstation.
>
> My aim being also to test Perl files.
>
> thanks
You can have Win32 versions of Apache and Perl both installed and
running under Windows quite happily on your PC.
You can also install Linux (which includes both Perl and Apache) on your
PC in a different partition to Windows. You can then choose which
operating system to use each time you boot.
hth,
Dave...
------------------------------
Date: Tue, 22 Jun 1999 13:32:46 GMT
From: "T.E.Dickey" <dickey@shell.clark.net>
Subject: Re: Interpreting MS-ASCII - anyone have a filter?
Message-Id: <2gMb3.1101$4e1.49560@iad-read.news.verio.net>
In comp.lang.awk Bart Lateur <bart.lateur@skynet.be> wrote:
> Alan J. Flavell wrote:
>>MS have a
>>tendency to refer to their 8-bit codings as "ANSI", but I've never found
>>anything from the ANSI that justifies this usage, either.
> But yes. Windows uses a superset of ISO-Latin-1, AKA "Ansi", which is
> the same as most Unices use. That is in contrast with plain DOS, which
> uses a different character mapping for the upper character code half
> altogether (AKA "OEM", Original Equipment Manufacturer).
It's not a superset (because it alters the meanings of some defined codes
in the C1 range - ISO 6429), but a "normally" benign mutation.
--
Thomas E. Dickey
dickey@clark.net
http://www.clark.net/pub/dickey
------------------------------
Date: Tue, 22 Jun 1999 08:40:07 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: mod_perl and resources
Message-Id: <376F8427.4C73C20E@mathworks.com>
Kamil Kukura wrote:
> Anyone using mod_perl with Apache? To me it seems that every httpd process
> is running perl interpreter so that it eats a lot of resources.
>
> Kamil
True httpd will grow depending upon your modules, however, with mod_perl you
are trying to manage the trade-off between a large httpd process and running
lots of perl shells every time someone runs your CGI scripts.
Personally, I think mod_perl is a cleaner more efficient solution.
Craig
------------------------------
Date: Tue, 22 Jun 1999 13:02:27 GMT
From: Gareth Rees <garethr@cre.canon.co.uk>
Subject: Re: mod_perl and resources
Message-Id: <sin1xs8k2k.fsf@cre.canon.co.uk>
Kamil Kukura wrote:
> Anyone using mod_perl with Apache? To me it seems that every httpd
> process is running perl interpreter so that it eats a lot of
> resources.
It's not as bad as you might think, since on most operating systems the
perl interpreter is shared between processes - it's only the heap that
is duplicated (but perl still uses a lot of memory).
The thing to do is to reduce the number of server processes that you
launch (Apache config variable MaxSpareServers) or add memory until all
your processes fit into main memory and the servers can run without
swapping. At that point Perl's memory consumption is no longer the
bottleneck.
Perl is a good solution when system resources (memory, cpu) are
plentiful and programmer resources are scarce. If system resources are
scarce you may need to reconsider.
--
Gareth Rees
------------------------------
Date: Tue, 22 Jun 1999 13:08:55 +0000
From: Jay Flahertry <fty@utk.edu>
Subject: Re: mod_perl references
Message-Id: <376F8AE7.2D995F45@utk.edu>
Donny Widjaja wrote:
> Hi,
>
> I am planning to use mod_perl to speed up my CGI scripts and save some
> memory.
> Can someone give me a reference for mod_perl other than
> http://www.perl.com?
>
http://perl.apache.org
I would also highly recommend the "Writing Apache modules with Perl and
C" ( http://www.modperl.com )
--
Take care of your shoes...jay
fty@utk.edu
------------------------------
Date: Tue, 22 Jun 1999 13:30:57 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: mod_perl references
Message-Id: <376f8ec5.571988@news.skynet.be>
Jay Flahertry wrote:
>I would also highly recommend the "Writing Apache modules with Perl and
>C" ( http://www.modperl.com )
So would I. I've been browsing in it in a bookshop yesterday, and this
book looks terribly good. It is written by two people: Lincoln Stein,
who programmed CGI.pm, and Doug MacEachern, who programmed mod_perl.
Talk about an authoritive duo.
See also O'Reilly website for excerpts:
<http://www.oreilly.com/catalog/wrapmod/>.
Bart.
------------------------------
Date: Tue, 22 Jun 1999 13:19:29 +0000
From: Jay Flahertry <fty@utk.edu>
Subject: Re: Need help with a perl/cgi workaround
Message-Id: <376F8D61.DE5DB581@utk.edu>
esalmon@packet.net wrote:
> I am trying to put together a simple proxy CGI submit script that
> submits a POST, not a GET, CGI form submit. Following, is a script that
> submits a form through GET and it works fine. How would I change this
> script to do a post instead? If the CGI data pairs are not sent on the
> request line for POST, like it is for GET, what would need to be changed
> and/or added to the following script. I know it is sent through STDIN
> but how do I implement that, in Perl, from here?
>
Forget about trying to roll your own CGI parser and get CGI.pm. Does all this for you automatically and then some. It has been
around for years and is very solid. Comes standard with perl5 now and has the best documentation of any module I have ever used.
--
Take care of your shoes...jay
fty@utk.edu
------------------------------
Date: Tue, 22 Jun 1999 14:38:06 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: Question about writing to a file in perl..
Message-Id: <376F91BE.72930099@dave.org.uk>
bobo_the_monkey@my-deja.com wrote:
>
> I want to know if it's possible to edit a file by writing to it in the
> middle of the file. I have a list that I want to add items to through
> the web, but I want to keep it alphabetical. Can I insert items into it
> without putting my list in an array, editing it, and then rewriting it
> all to the file? Thanks.
Sounds like the question - "How do I change one line in a file/delete a
line in a file/insert a line in the middle of a file/append to the
beginning of a file?" from perlfaq5 would pretty much cover it.
In what way was it unclear?
Dave...
------------------------------
Date: Mon, 21 Jun 1999 19:44:45 -0800
From: Joa@inc.com (Joe)
Subject: Recursive Delete
Message-Id: <Joa-2106991944460001@haines-du-01-07.seaknet-dom.alaska.edu>
Hello,
Is there a good way to recursively delete a subdirectory and all of its
subdirectories? I've attempted to do this with the following code, but it
doesn't work, instead reporting an error. (The deepest subdirectory is
reported to not be a file or folder.)
##########
# Recursively delete subdirectory
#
sub delete_directory {
opendir(DIRECTORY, "$_[0]") or &error_die('Unable to delete directory',
"(<B>$_[0]</B>)",
"Be sure \$pathtohtml is set correctly in the file \"openpage.cfg\".");
@directories = grep !/\./, readdir DIRECTORY; # list only the directories
unless (@directories eq "") {
foreach $directory (@directories) { delete_directory ($_[0]/$directory); }
}
@files = readdir DIRECTORY; # list everything, should only be files now.
unlink @files;
rmdir $_[0] or &error_die('Unable to delete directory', "(<B>$_[0]</B>)",
"Be sure \$pathtohtml is set correctly in the file \"openpage.cfg\".");
}
#
##########
Please send a copy of your reply to me via email (jeremy@alaskanweb.net)
as my news server is unreliable at best.
Thanks for any help!
-Jeremy
jeremy@alaskanweb.net
------------------------------
Date: Tue, 22 Jun 1999 12:18:19 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Searching for RegEx in binary files
Message-Id: <37707e53.6414910@news.skynet.be>
Rutzmoser Stefan wrote:
>foreach(@File)
>{
> /$ProgPattern/ && do { ... printsomething ... };
> /$COPYPattern/ && do { ... printsomething ... };
>}
>
>The ProgPattern matches once (ok). The COPY-Pattern matches also once.
>This is false, because there ARE more than one String like this in the
>given file. There is only the first one found.
>
>What can I do to find all matches?
You mean there's supposed to be more than one match per line?
Then try:
while(/($COPYPattern)/go) {
print "Found a COPYPattern in $1\n";
}
The //o option serves to speed up the search (you don't change
$COPYPattern after the first time, do you?), but the //g allows you to
go through all matches that can be found.
HTH,
Bart.
------------------------------
Date: Tue, 22 Jun 1999 15:10:26 +0200
From: =?iso-8859-1?Q?Bj=F6rn?= Teegen <bjoern.teegen@gmx.de>
To: Raj <technology@workmail.com>
Subject: Re: simple requirement..help please!
Message-Id: <376F8B41.A71D3670@gmx.de>
Hallo Raj!
> Hi,
> I have a shellScript "prog.sh". How do i call this from within my
> CGI/Perl Script??
> I used system command but it is not executing at all. Any help
> please!!!! TIA,
> Raj
Try:
system('sh prog.sh');
Bjvrn
------------------------------
Date: 22 Jun 1999 13:47:01 GMT
From: gbacon@itsc.uah.edu (Greg Bacon)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <7ko44l$lg$3@info2.uah.edu>
In article <377077b3.4718606@news.skynet.be>,
bart.lateur@skynet.be (Bart Lateur) writes:
: OK. It looks like Abigail can select the quoting prefix by hand for
: every single post. However, I do think that there's a very general
: approach, that should work for whatever she's going to invent next. Here
: it is:
I don't believe in the existence of such a beast. We're talking about
human generated and (in most cases, sadly) unvalidated text. There's a
very general way to find an article's signature, but it only works when
people actually use a cutline.
It's a heuristic. Clever people can get around heuristics. The
alternative is to try security through obscurity, but that would be
incredibly stupid and disingenuous of me. It's just an estimate.
: * Do OCR check as usual. If it looks like somebody has a suspiciously
: high OCR ratio, it either must be Abigail, or somebody trying to imitate
: her. In that case:
What is suspiciously high?
: * Check the most frequent occuring prefix in one post, excluding
: whitespace. Something like:
:
: while(/^(\S\S)/gm) {
: $prefix{$1}++;
: }
That's beatable too. What if she uses different prefixes for each
quoted line?
: * The number of quoted lines is the highest value in values %prefix. Or,
: sort keys %prefix acooording to value, and pick the last item.
Too problematic.
: The only way to beat that, is to use more than one quoting prefix in one
: post, which *definitely* is bad Usenet prectise, and qhould be frowned
: upon, as it will no longer be easily identifiable as quoting, for the
: human reader, also.
IYHO.
Greg
--
If crime fighters fight crime, and firefighters fight fire, what do freedom
fighters fight? They never mention that part to us, do they?
-- George Carlin
------------------------------
Date: 22 Jun 1999 13:52:54 GMT
From: Franklin Edward Sadler <gte482i@prism.gatech.edu>
Subject: Sub Routines Question, Parameters
Message-Id: <7ko4fm$1m9@catapult.gatech.edu>
Alright, another quick question. How do you pass variables into sub
routines? Im under the impression you do it when you call it,
for ex. getArray($a,$b);
If this is they way do u have to do anything in the sub routine to take in
these variables? Any help would be appreciated.
Thanx...
--
M U S T A N G Z !
Franklin Edward Sadler
Georgia Institute of Technology, Atlanta Georgia, 30332
Email: gte482i@prism.gatech.edu
------------------------------
Date: Tue, 22 Jun 1999 12:52:30 GMT
From: jerbyr@my-deja.com
Subject: Sybperl bcp initialization
Message-Id: <7ko0ua$818$1@nnrp1.deja.com>
I am having a problem using the bulk copy procedures in sybperl. When I
attempt to initialize the bcp, I get an error stating that 'the front
end you are using does not support bulk insert from host...'.
I have been unable to figure out what is meant by 'front end' in this
situation. Bulk insert from host is definitely habdled by Sybase and my
system (as it is done in other c++ based applications currently in use
on my system), and sybperl also supports this functionality, so I am
clueless as to where the problem is.
Has anyone ever encountered this error message before? Have any
insights on where I can look for the problem?
Thanks for your help.
Jeremy Purdy
jpurdy@mrj.com
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Tue, 22 Jun 1999 14:21:08 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: Upload Module?
Message-Id: <376F8DC4.2EA03CB1@dave.org.uk>
Matt wrote:
>
> Hi,
>
> Anyone know of any modules used for uploading images of types such as .gif
> or .jpeg. I'm sure they are out there, I have seen some I'm pretty sure but
> I need an opinion on a "best one".
What do you need that Net::FTP doesn't do?
Dave...
------------------------------
Date: Tue, 22 Jun 1999 14:23:41 +0100
From: Dave Cross <dave@dave.org.uk>
Subject: Re: uploading by browser
Message-Id: <376F8E5D.21E70912@dave.org.uk>
Mark Stellaard wrote:
>
> Hello everybody,
>
> I want to write a perl program which is able to let users upload word
> document's to a Unix server in a specific directory tru a webbrowser. Is
> this possible ?
Yes.
> And if so, can somebody tell me what modules I have to use, and how this can
> be done easily, or if there is any information about this specific topic.
CGI.pm
> Thanx a lot :-)
Pleasure!
> Mark
Dave...
------------------------------
Date: 22 Jun 1999 12:55:09 GMT
From: mstevens@wildcat.imaginet.co.uk (Michael Stevens)
Subject: Re: What is First line in Perl5 in Sun Micro...
Message-Id: <slrn7mv24r.3qs.mstevens@wildcat.imaginet.co.uk>
On Mon, 21 Jun 1999 15:41:16 -0400, Craig Ciquera <craig@mathworks.com> wrote:
>Dave Cross wrote:
>> It really depends where Perl has been installed on your system. It's
>> impossible for anyone here to know. Best you ask your system
>> administrator.
>which will tell you where Perl is. If its there at all.
>Here is the output on my machine
>% which perl
>/usr/local/bin/perl
That assumes it's in your path, which may well not be true.
------------------------------
Date: Tue, 22 Jun 1999 14:15:38 BST
From: gml4410@ggr.co.uk (Lack Mr G M)
Subject: Re: What is First line in Perl5 in Sun Micro...
Message-Id: <1999Jun22.141538@ukwit01>
In article <slrn7mv24r.3qs.mstevens@wildcat.imaginet.co.uk>, mstevens@wildcat.imaginet.co.uk (Michael Stevens) writes:
|>
|> >% which perl
|> >/usr/local/bin/perl
|>
|> That assumes it's in your path, which may well not be true.
It also assumes that you are using a c-shell, since "which" may well
push you into that in order to run.
bash uses "type": ksh uses "whence".
--
----------- Gordon Lack ----------------- gml4410@ggr.co.uk ------------
The contents of this message *may* reflect my personal opinion. They are
*not* intended to reflect those of my employer, or anyone else.
------------------------------
Date: 22 Jun 1999 08:30:04 -0500
From: Kent Perrier <kperrier@blkbox.com>
Subject: Re: What is First line in Perl5 in Sun Micro...
Message-Id: <ysiiu8gmkgz.fsf@blkbox.com>
Craig Ciquera <craig@mathworks.com> writes:
>
> which will tell you where Perl is. If its there at all.
>
> Here is the output on my machine
> % which perl
> /usr/local/bin/perl
But only if perl is in your path. If not, you will have to use find to
find your perl executable. or you could just ask your friendly sys admin.
Kent
------------------------------
Date: Tue, 22 Jun 1999 09:46:25 -0400
From: Craig Ciquera <craig@mathworks.com>
Subject: Re: What is First line in Perl5 in Sun Micro...
Message-Id: <376F93B1.B54556BE@mathworks.com>
Kent Perrier wrote:
> But only if perl is in your path. If not, you will have to use find to
> find your perl executable. or you could just ask your friendly sys admin.
>
> Kent
Just giving Michael something to try before he bother his sys-admin.
Sorry.
Craig
------------------------------
Date: Tue, 22 Jun 1999 11:31:35 GMT
From: mpeppler@mbay.net
Subject: Re: When is Sybperl a good choice
Message-Id: <7kns6n$6f8$1@nnrp1.deja.com>
In article <slrn7msjcc.k1b.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:
> Nostradamus (mboertien@my-deja.com) wrote on MMCXX September MCMXCIII
in
> <URL:news:7klb1n$8sc$1@nnrp1.deja.com>:
> ~~ At the moment i am investigating whether or not it is usefull to
start
> ~~ using perl and sybperl to write some scripts with. Before i
programmed
> ~~ things in shell scripts which just called isql. Problem with this
was
> ~~ that it was quite difficult to get multiple values back.....so now
i am
> ~~ looking into perl together with sybperl.....could anyone give me
some
> ~~ advice on this?
>
> Sybperl comes with pretty good documentation. It also contains a link
> the Michael Peppers (I think I spelled this wrong) homepage, which has
> lots of additional information.
Close - it's Peppler :-)
And more docs are available at http://www.mbay.net/~mpeppler
Michael
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
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 6089
**************************************
