[23001] in Perl-Users-Digest
Perl-Users Digest, Issue: 5221 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 14 09:06:02 2003
Date: Mon, 14 Jul 2003 06:05:09 -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, 14 Jul 2003 Volume: 10 Number: 5221
Today's topics:
Re: [Q] package "IO::Handle" <grazz@pobox.com>
Re: Check fileage with -M when path contains a point? (Tad McClellan)
combinatorics, scripts for <weberh@zedat.fu-berlin.de>
Re: Couple of array/reference type questions <REMOVEsdnCAPS@comcast.net>
Re: flock() and W95 (Mark Jason Dominus)
Re: How to do SSL FTP? <cat@no-spam.com>
Re: Need help with posting to CGI from javascript <ron@savage.net.au>
Re: Need help with wwwboard perl cgi script <cryo-fan@mylinuxisp.com>
Re: Need help with wwwboard perl cgi script <asu1@c-o-r-n-e-l-l.edu>
Re: Need help with wwwboard perl cgi script <cryo-fan@mylinuxisp.com>
Re: Need help with wwwboard perl cgi script <asu1@c-o-r-n-e-l-l.edu>
Re: Need help with wwwboard perl cgi script <bart.lateur@pandora.be>
Re: Need help with wwwboard perl cgi script <cryo-fan@mylinuxisp.com>
Re: Need help with wwwboard perl cgi script <cryo-fan@mylinuxisp.com>
Re: Perl for Win32 <Daniel.Ayers@ir.com>
Re: Problem uploading file of large size in Perl/Apache (Paresh Shah)
safe cgi programming in perl? <me@home.com>
Re: Standalone Perlscript <g4rry_short@zw4llet.com>
Re: Standalone Perlscript <tassilo.parseval@rwth-aachen.de>
Re: Standalone Perlscript (Richard Williams)
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Re: Synchronizing two ftp sites/folders <cwilbur@mithril.chromatico.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 14 Jul 2003 01:06:55 GMT
From: Steve Grazzini <grazz@pobox.com>
Subject: Re: [Q] package "IO::Handle"
Message-Id: <PmnQa.5475$3G5.3612@nwrdny03.gnilink.net>
bill <bill_knight2@yahoo.com> wrote:
> DB<1> STDOUT->foo("bar")
> Can't locate object method "foo" via package "IO::Handle" [...]
> DB<2> p ref STDOUT
>
> DB<3> p ref *STDOUT
>
> DB<4>
>
> How come Perl treats STDOUT as an IO::Handle object in <1>, but
> ref does not report any class in <2> or <3>?
Long story short, the object is in the IO slot of *STDOUT.
print ref *STDOUT{IO};
You were looking at the string "STDOUT" and the glob *STDOUT,
neither of which are references.
Truth is, this is also a bareword string:
STDOUT->foo();
But during the method call Perl does some DWIMery to figure out
whether the string is supposed to be the name of a package or of
a filehandle.
Note the quotes:
% perl -e '"STDOUT"->foo'
Can't locate object method "foo" via package "IO::Handle"...
And the package:
% perl -e 'local STDOUT; STDOUT->foo'
Can't locate object method "foo" via package "STDOUT"...
--
Steve
------------------------------
Date: Sun, 13 Jul 2003 20:10:10 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Check fileage with -M when path contains a point?
Message-Id: <slrnbh40ni.1kr.tadmc@magna.augustmail.com>
Math55 <magelord@t-online.de> wrote:
[ snip 70 lines of full-quote ]
[ I have asked you to please stop doing that ]
> hi,
bye.
*plonk*
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 14 Jul 2003 09:50:33 +0200
From: Harald Weber <weberh@zedat.fu-berlin.de>
Subject: combinatorics, scripts for
Message-Id: <weberh-F72F57.09503314072003@news.fu-berlin.de>
Hi !
There is no CPAN module that covers
the basics of combinatorics, is there ? (gurus: yawn!)
There are some modules for permutation (k=n),
but this is only a very special case to combine
a set of items.
Below you can find four scripts(comb1,comb2,comb3,comb4)
suited for the common combinatorial tasks.
Basically, there are 4 possibilities to choose k items
out of a set of n items ( well, thatıs what I have read :-).
Letıs say k=3; n=(a,b,c,d)
1. no repetition, no order (k,n > 0; k <= n)
abc, abd, acd, bcd (4)
2. no repetition, order (k,n > 0; k <= n)
abc,abd,acb ... dcb (24)
3. repetition, no order (k,n > 0)
aaa,aab,aac,aad,abb ... ddd (20)
4. repetition, order (k,n > 0)
aaa,aab,aac,aad,aba ... ddd (64)
Now, there should be four algorithms spitting out the
desired combinations without restricting the users choice
of k and n.
On command line it could look like this:
combx length item1 item2 ..., e.g.
combx 3 a b c d or
combx 6 cherry coconut orange banana peach
Maybe youıd like to work out better solutions.
Iım sure itıs easy for you to write more stylish code,
but it shouldnıt be much slower than this one.
Hopefully this posting is somehow helpful
(give me a hint: is this too much code for a posting ?!).
Harald
+++++
#!/usr/bin/perl -w
#Program comb1 (combinatorics: repeat - ,order -)
#Usage: comb1 length item1 item2 ...
use strict;
my ($length,@items) = @ARGV;
my $code = "my \$x0 = -1;\n";
for (my $c=1; $c <= $length; $c++){
$code .= "for (my \$x$c = \$x" . ($c-1)
. " + 1; \$x$c <= \$#items - \$length + $c; \$x$c++){\n"
}
$code .= 'print "';
for (my $c=1; $c <= $length; $c++)
{$code .= "\$items[\$x$c] "}
$code .= '\n"' . '}' x$length . "\n";
eval($code);
#print $code
+++++
#!/usr/bin/perl -w
#Program comb2 (combinatorics: repeat - , order +)
#Usage: comb2 length item1 item2 ...
use strict;
my ($length,@items) = @ARGV;
my @x0 = \(@items);
my $code = "";
for (my $c=1; $c <= $length; $c++){
$code .= "for (my \$x$c = 0; \$x$c <= \$#x" . ($c-1) . "; \$x$c++)"
. "{my \@x$c = \@x" . ($c-1) . "; splice(\@x$c,\$x$c,1);\n"
}
$code .= 'print "';
for (my $c=0; $c <= $length - 1; $c++)
{$code .= "\${\$x" . $c . "[\$x" . ($c+1) . "]} "}
$code .= '\n"' . '}' x$length . "\n";
eval($code);
#print $code
+++++
#!/usr/bin/perl -w
#Program comb3 (combinatorics: repeat +, order -)
#Usage: comb3 length item1 item2 ...
use strict;
my ($length,@items) = @ARGV;
my $code = "my \$x0 = 0;\n";
for (my $c=1; $c <= $length; $c++){
$code .= "for (my \$x$c = \$x" . ($c-1)
. "; \$x$c <= \$#items; \$x$c++){\n"
}
$code .= 'print "';
for (my $c=1; $c <= $length; $c++)
{$code .= "\$items[\$x$c] "}
$code .= '\n"' . '}' x$length . "\n";
eval($code);
#print $code
+++++
#!/usr/bin/perl -w
#Program comb4 (combinatorics: repeat +, order +)
#Usage: comb4 length item1 item2 ...
use strict;
my ($length,@items) = @ARGV;
my $code = "";
for (my $c = 1; $c <= $length; $c++){
$code .= "for (my \$x$c = 0; \$x$c <= $#items; \$x$c++)\n{"
}
$code .= 'print "';
for (my $c=1; $c <= $length; $c++)
{$code .= "\$items[\$x$c] "}
$code .= '\n"' . '}' x$length . "\n";
eval($code);
#print $code
+++++
------------------------------
Date: Mon, 14 Jul 2003 04:48:06 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: Couple of array/reference type questions
Message-Id: <Xns93B83B00CDE3Dsdn.comcast@206.127.4.25>
-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1
Arvin Portlock <apollock11@hotmail.com> wrote in news:besj3q$1dti$1
@agate.berkeley.edu:
> I'm printing this out and pinning it to my computer! Thanks you so
> much Eric.
>
> BTW, yes, the foreach is cleaner than my for. I forgot they're
> references after all and I needn't go through all that subscript
> nonsense.
Just remember: An array reference is just like an array, except that you
have to go through one extra step to dereference it when you use it.
- --
Eric
$_ = reverse sort qw p ekca lre Js reh ts
p, $/.r, map $_.$", qw e p h tona e; print
-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>
iQA/AwUBPxJ8T2PeouIeTNHoEQLy8QCeO/mpBm8N2/el4ow12FtqeqgExagAniql
qgvs3x3r8HyKpYqe/e7LTzjn
=OXbq
-----END PGP SIGNATURE-----
------------------------------
Date: Mon, 14 Jul 2003 02:22:24 +0000 (UTC)
From: mjd@plover.com (Mark Jason Dominus)
Subject: Re: flock() and W95
Message-Id: <bet450$58v$1@plover.com>
In article <berd9f$7n05r$1@ID-184292.news.uni-berlin.de>,
Gunnar Hjalmarsson <noreply@gunnar.cc> wrote:
>I'm not using 'subs' since, as I mentioned in a reply to Tassilo, I
>want the solution to cover also occurrences of flock() in modules like
>Tie::File that don't use or require anything from my program.
While this isn't directly germane to your problem (of overridding
flock() globally) if you wanted to deal with Tie::File, the easy way
would be just to subclass it and override the Tie::File::flock method,
which is the only place that Tie::File uses flock.
------------------------------
Date: Mon, 14 Jul 2003 22:47:12 +1000
From: Cat <cat@no-spam.com>
Subject: Re: How to do SSL FTP?
Message-Id: <3F12A650.22425E22@no-spam.com>
Brian wrote:
>
> I don't think Net::SFTP uses SSL. I think Net::SFTP is based on SSH,
> which, unfortunately, my requirements do not allow me to use.
>
> Any other suggestions?
>
> "J. Gleixner" wrote:
Mmmm, there's a few of us out here that would like to do ftp over ssl using
perl, including myself.
Off topic: you can google for sslftp for some stuff... good luck
------------------------------
Date: Mon, 14 Jul 2003 21:38:59 +1000
From: "Ron Savage" <ron@savage.net.au>
Subject: Re: Need help with posting to CGI from javascript
Message-Id: <beu4o1$27fu$1@arachne.labyrinth.net.au>
"Stacey" <stacye@optonline.net> wrote in message
news:uiJPa.21724$hY1.6513370@news4.srv.hcvlny.cv.net...
> Here is a function that is declared in my html page. It is part of a
series
> of javascript that allows the user to draw a rectangle on a graphic. This
> is called when the box is done, so I would like to send the screen coords
> which I know already to a cgi script at this point below. Can anybody
help
# 30:
http://savage.net.au/Perl-tuts-1-30.html
--
Ron Savage
ron@savage.net.au
http://savage.net.au/index.html
------------------------------
Date: Sun, 13 Jul 2003 20:20:18 -0500
From: randy <cryo-fan@mylinuxisp.com>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <6514hvkrs6jvrk56t3bnhbldllg9hrp6vc@4ax.com>
On 14 Jul 2003 00:58:22 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
wrote:
>randy <cryo-fan@mylinuxisp.com> wrote in
>news:vms3hvkqibiorcjtm8214kh02unionm9t8@4ax.com:
>
><snip>
>
>> When I go to http://www.mylinuxisp.com/~cryofan/wwwboard.html I do
>> get the message posting form, but when I try to post a message, the
>> browser goes to http://www.mylinuxisp.com/cgi-bin/wwwboard.pl which is
>> an HTTP 404 "This page cannot be found" page. What happened to the
>> "cryofan" part of the URL, anyway?
>
><snip>
>
>> $cgi_url ='http://www.mylinuxisp.com/~cryofan/cgi-bin/wwwboard.pl';
>
><snip>
>
>> Here is the form action path in the wwwboard.html file:
>> <form method="post" action="/cgi-bin/wwwboard.pl">
>
>Why do $cgi_url and the action part of the form not match?
THe installation file said it did not have to be the full URL.
However I did just now set the form action path to be the same as the
cgi_url, and no luck there--Now I have a Form 403 Forbidden page come
up when I try to post a message, like this:
"Forbidden
You don't have permission to access /~cryofan/cgi-bin/wwwboard.pl on
this server."
But I just checked the wwwboard.pl permissions, and it is set to
rwxr_xr_x which is 755, just as the installation instructions demand.
-------------
-Randy
------------------------------
Date: 14 Jul 2003 01:47:35 GMT
From: "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <Xns93B7DDB2169C6asu1cornelledu@132.236.56.8>
randy <cryo-fan@mylinuxisp.com> wrote in
news:6514hvkrs6jvrk56t3bnhbldllg9hrp6vc@4ax.com:
> On 14 Jul 2003 00:58:22 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
> wrote:
>
>>randy <cryo-fan@mylinuxisp.com> wrote in
>>news:vms3hvkqibiorcjtm8214kh02unionm9t8@4ax.com:
>>
>><snip>
>>
>>> When I go to http://www.mylinuxisp.com/~cryofan/wwwboard.html I do
>>> get the message posting form, but when I try to post a message, the
>>> browser goes to http://www.mylinuxisp.com/cgi-bin/wwwboard.pl which
>>> is an HTTP 404 "This page cannot be found" page. What happened to
>>> the "cryofan" part of the URL, anyway?
>>
>><snip>
>>
>>> $cgi_url
>>> ='http://www.mylinuxisp.com/~cryofan/cgi-bin/wwwboard.pl';
>>
>><snip>
>>
>>> Here is the form action path in the wwwboard.html file:
>>> <form method="post" action="/cgi-bin/wwwboard.pl">
>>
>>Why do $cgi_url and the action part of the form not match?
>
> THe installation file said it did not have to be the full URL.
That is not the point. You do realize that
/~cryofan/cgi-bin/wwwboard.pl
and
/cgi-bin/wwwboard.pl
are different, right?
> However I did just now set the form action path to be the same as the
> cgi_url, and no luck there--Now I have a Form 403 Forbidden page come
> up when I try to post a message, like this:
>
> "Forbidden
> You don't have permission to access /~cryofan/cgi-bin/wwwboard.pl on
> this server."
>
> But I just checked the wwwboard.pl permissions, and it is set to
> rwxr_xr_x which is 755, just as the installation instructions demand.
Your post was only marginally on topic to begin with, and now it has
drifted way off-topic. Given that browsing to
http://www.mylinuxisp.com/~cryofan/
also results in a 403 means you have a configuration issue that you must
handle with your ISP.
Sinan.
--
A. Sinan Unur
asu1@c-o-r-n-e-l-l.edu
Remove dashes for address
Spam bait: mailto:uce@ftc.gov
------------------------------
Date: Sun, 13 Jul 2003 20:57:43 -0500
From: randy <cryo-fan@mylinuxisp.com>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <pc34hv0d8b1karhtm844q9ti23ptp9ctot@4ax.com>
On 14 Jul 2003 01:47:35 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
wrote:
>randy <cryo-fan@mylinuxisp.com> wrote in
>news:6514hvkrs6jvrk56t3bnhbldllg9hrp6vc@4ax.com:
>
>> On 14 Jul 2003 00:58:22 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
>> wrote:
>>
>>>randy <cryo-fan@mylinuxisp.com> wrote in
>>>news:vms3hvkqibiorcjtm8214kh02unionm9t8@4ax.com:
>>>
>>><snip>
>>>
>>>> When I go to http://www.mylinuxisp.com/~cryofan/wwwboard.html I do
>>>> get the message posting form, but when I try to post a message, the
>>>> browser goes to http://www.mylinuxisp.com/cgi-bin/wwwboard.pl which
>>>> is an HTTP 404 "This page cannot be found" page. What happened to
>>>> the "cryofan" part of the URL, anyway?
>>>
>>><snip>
>>>
>>>> $cgi_url
>>>> ='http://www.mylinuxisp.com/~cryofan/cgi-bin/wwwboard.pl';
>>>
>>><snip>
>>>
>>>> Here is the form action path in the wwwboard.html file:
>>>> <form method="post" action="/cgi-bin/wwwboard.pl">
>>>
>>>Why do $cgi_url and the action part of the form not match?
>>
>> THe installation file said it did not have to be the full URL.
>
>That is not the point. You do realize that
>
>/~cryofan/cgi-bin/wwwboard.pl
>
>and
>
>/cgi-bin/wwwboard.pl
>
>are different, right?
No, I do not.
>> However I did just now set the form action path to be the same as the
>> cgi_url, and no luck there--Now I have a Form 403 Forbidden page come
>> up when I try to post a message, like this:
>>
>> "Forbidden
>> You don't have permission to access /~cryofan/cgi-bin/wwwboard.pl on
>> this server."
>>
>> But I just checked the wwwboard.pl permissions, and it is set to
>> rwxr_xr_x which is 755, just as the installation instructions demand.
>
>Your post was only marginally on topic to begin with, and now it has
>drifted way off-topic.
>Given that browsing to
>http://www.mylinuxisp.com/~cryofan/
>
>also results in a 403 means you have a configuration issue that you must
>handle with your ISP.
>
Umm....no, it means that I have no index.html file currently. Which is
OK with me, as I do not need one right now.
-------------
-Randy
------------------------------
Date: 14 Jul 2003 02:07:50 GMT
From: "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <Xns93B7E120937ECasu1cornelledu@132.236.56.8>
randy <cryo-fan@mylinuxisp.com> wrote in
news:pc34hv0d8b1karhtm844q9ti23ptp9ctot@4ax.com:
>> On 14 Jul 2003 00:58:22 GMT, "A. Sinan Unur"
>> <asu1@c-o-r-n-e-l-l.edu> wrote:
>>
>>That is not the point. You do realize that
>>
>>/~cryofan/cgi-bin/wwwboard.pl
>>
>>and
>>
>>/cgi-bin/wwwboard.pl
>>
>>are different, right?
>
> No, I do not.
I do not know what to say to that.
>>Given that browsing to
>>
>>http://www.mylinuxisp.com/~cryofan/
>>
>>also results in a 403 means you have a configuration issue that you
>>must handle with your ISP.
>>
>
> Umm....no, it means that I have no index.html file currently. Which is
> OK with me, as I do not need one right now.
I see you have uploaded one in the interim. OK, so that was a red
herring, but the fact still remains that your problem probably has
nothing to do with Perl.
Sinan.
--
A. Sinan Unur
asu1@c-o-r-n-e-l-l.edu
Remove dashes for address
Spam bait: mailto:uce@ftc.gov
------------------------------
Date: Mon, 14 Jul 2003 02:22:56 GMT
From: Bart Lateur <bart.lateur@pandora.be>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <9r44hvo0sopp19glrbtsnkbrh6ontbprra@4ax.com>
randy wrote:
>On 14 Jul 2003 01:47:35 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
>wrote:
>>You do realize that
>>
>>/~cryofan/cgi-bin/wwwboard.pl
>>
>>and
>>
>>/cgi-bin/wwwboard.pl
>>
>>are different, right?
>
>No, I do not.
Duh... Both are absolute paths. The leading slash makes it so.
If you want to reference </~cryofan/cgi-bin/wwwboard.pl> from within
itself, "wwwboard.pl" probably would work -- unless you had used the
path_info mechanism to pass more data to your script. Note: no leading
slash.
--
Bart.
------------------------------
Date: Sun, 13 Jul 2003 21:44:25 -0500
From: randy <cryo-fan@mylinuxisp.com>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <r564hv88pi28j4eqjsvntou56mu5q951ek@4ax.com>
On Mon, 14 Jul 2003 02:22:56 GMT, Bart Lateur <bart.lateur@pandora.be>
wrote:
>randy wrote:
>
>>On 14 Jul 2003 01:47:35 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
>>wrote:
>
>>>You do realize that
>>>
>>>/~cryofan/cgi-bin/wwwboard.pl
>>>
>>>and
>>>
>>>/cgi-bin/wwwboard.pl
>>>
>>>are different, right?
>>
>>No, I do not.
>
>Duh... Both are absolute paths. The leading slash makes it so.
>
>If you want to reference </~cryofan/cgi-bin/wwwboard.pl> from within
>itself, "wwwboard.pl" probably would work -- unless you had used the
>path_info mechanism to pass more data to your script. Note: no leading
>slash.
Right. Of course, I have already dealt with that issue by making the
wwwboard.html reference to the pl script as absolute, which now causes
a 403 page to be sent to me.
-------------
-Randy
------------------------------
Date: Sun, 13 Jul 2003 22:56:18 -0500
From: randy <cryo-fan@mylinuxisp.com>
Subject: Re: Need help with wwwboard perl cgi script
Message-Id: <tba4hv416h20egqq187r65prghkpvc2ht1@4ax.com>
Thanks for your help, I managed to fix the problem by changing the
variables several times.
FYI, my original post was on topic for this NG, So you might wanna
turn in your Netcop badge....
On 14 Jul 2003 02:07:50 GMT, "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
wrote:
>randy <cryo-fan@mylinuxisp.com> wrote in
>news:pc34hv0d8b1karhtm844q9ti23ptp9ctot@4ax.com:
>
>>> On 14 Jul 2003 00:58:22 GMT, "A. Sinan Unur"
>>> <asu1@c-o-r-n-e-l-l.edu> wrote:
>>>
>>>That is not the point. You do realize that
>>>
>>>/~cryofan/cgi-bin/wwwboard.pl
>>>
>>>and
>>>
>>>/cgi-bin/wwwboard.pl
>>>
>>>are different, right?
>>
>> No, I do not.
>
>I do not know what to say to that.
>
>>>Given that browsing to
>>>
>>>http://www.mylinuxisp.com/~cryofan/
>>>
>>>also results in a 403 means you have a configuration issue that you
>>>must handle with your ISP.
>>>
>>
>> Umm....no, it means that I have no index.html file currently. Which is
>> OK with me, as I do not need one right now.
>
>I see you have uploaded one in the interim. OK, so that was a red
>herring, but the fact still remains that your problem probably has
>nothing to do with Perl.
>
>Sinan.
-------------
-Randy
------------------------------
Date: Mon, 14 Jul 2003 07:47:14 GMT
From: "Dan Ayers" <Daniel.Ayers@ir.com>
Subject: Re: Perl for Win32
Message-Id: <6etQa.397$Vw1.19741@news.optus.net.au>
There is a space in $PVCSDatabase - the shell won't like that.
Try including quotes (\") in the string passed into the system() function
Dan
"Armando Torres" <Torres__Armando@msn.com> wrote in message
news:5b4572c6.0307032052.41b67984@posting.google.com...
> I am learning Perl, and I have never programed before.
> I wrote a script that uses a Network path, but in the network path
> thee is a space, and it's not working; this is a sample:
>
> $PVCSDatabase = "\\\\PC\\Vault\\temp\\my folder";
> $SVRWEB = "C:/temp/eMitchell";
> print " --- Getting Source Code...\n";
> system("$PVCSClient get -pr$PVCSDatabase -a$SVRWEB -o -z -w
> /archives")
>
> It gives me an error becuse my folder.
> If someone can give some ideas, or the place to get some info.
>
> Thanks
------------------------------
Date: 13 Jul 2003 22:17:47 -0700
From: pareshrshah@yahoo.com (Paresh Shah)
Subject: Re: Problem uploading file of large size in Perl/Apache/Linux
Message-Id: <d5316768.0307132117.4f20fbce@posting.google.com>
Thanks Steve for helping me....
But this is not the problem, I saw the value of $CGI::POST_MAX value,
it is -1
and the problem is with jsp code also, some linux related problems or
Apache HTTP server problem
As I am not able to upload files through HTTP, but FTP allows me to
upload files.
Someone please help me....
Regards
Paresh Shah
Steve Grazzini <grazz@pobox.com> wrote in message news:<SbWPa.7500$Kw1.5802@nwrdny02.gnilink.net>...
> Paresh Shah <pareshrshah@yahoo.com> wrote:
> > I have one perl script which upload file to server, using
> > Apache as http server & Redhat Linux as OS.
> > Till 11th july, 2003 everything was working fine & suddenly
> > from 12th july i.e. today it started giveing problems. I can
> > upload file with size < 100K, but other files > 100K are not
> > being uploaded. It timeouts.....
>
> Look up "$CGI::POST_MAX" in the CGI manpage:
>
> % perldoc CGI
>
> This might not be what's happened, but it seems as likely as
> anything. (And consider that if you unset that variable you
> could be risking the wrath of whichever admin has recently
> turned it on.)
------------------------------
Date: Sun, 13 Jul 2003 23:23:51 -0700
From: Steve <me@home.com>
Subject: safe cgi programming in perl?
Message-Id: <pci4hvk85slk7jsuq7hdqrkp7j2nieua6u@4ax.com>
Hi all, please excuse the long post, but this is the longest perl
script I've ever written. My main concern is with untainting data and
using backtics for system commands. I read most of the documentation,
but confess the perlsec leaves me a little confused as to the best way
to write to files, etc.
I'm using -Tw on the shabang line, plus "use strict"
I threw this in, but I am not sure if it is neccessary:
$ENV{PATH} = "/bin:/usr/bin";
delete @ENV{ 'IFS', 'CDPATH', 'ENV', 'BASH_ENV' };
I'm only using mkdir, open and rm with user input.
Here's my untaint routines:
-------------------
if ($pairs{affilate_ID} =~ /^([-_\w.\s]+)$/) { $pairs{affilate_ID} =
$1 }
else { bad_data_in_affilate_ID () }
if ($pairs{general_theme} =~ /^([-_\w.\s]+)$/) { $pairs{general_theme}
= $1 }
else { bad_data_in_theme () }
my @untainted_keywords = split(/\, /, $pairs{keywords});
my $untainted_keyword;
for $untainted_keyword (@untainted_keywords) {
if ($untainted_keyword =~ /^([-_\w.\s]+)$/) { $untainted_keyword = $1
}
else { bad_data_in_keywords () }
}
-------------------
most of my commands to create directories, files and to remove files
are with backtics, and I've untainted all the data....so have I
covered all the bases or should I understand more about the perlsec
and shell vs system calls...esp this example:
use English '-no_match_vars';
die "Can't fork: $!" unless defined($pid = open(KID, "-|"));
if ($pid) { # parent
while (<KID>) {
# do something
}
close KID;
} else {
my @temp = ($EUID, $EGID);
my $orig_uid = $UID;
my $orig_gid = $GID;
$EUID = $UID;
$EGID = $GID;
# Drop privileges
$UID = $orig_uid;
$GID = $orig_gid;
# Make sure privs are really gone
($EUID, $EGID) = @temp;
die "Can't drop privileges"
unless $UID == $EUID && $GID eq $EGID;
$ENV{PATH} = "/bin:/usr/bin"; # Minimal PATH.
# Consider sanitizing the environment even more.
exec 'myprog', 'arg1', 'arg2'
or die "can't exec myprog: $!";
}
Thanks very much for any replys,
Steve
------------------------------
Date: Mon, 14 Jul 2003 10:04:48 +0000
From: Garry Short <g4rry_short@zw4llet.com>
Subject: Re: Standalone Perlscript
Message-Id: <betrsn$ah2$1$8300dec7@news.demon.co.uk>
William Hymen wrote:
> I have a perl script which I would like
> to run 'standalone'. In other words, I ONLY want
> to have gnu perl.exe available, and nothing more.
> I am not permitted to install perl in a production
> environment on NT or W2K here at work.
>
> The only function I need to include in the
> script is cwd. Which is used as
> $folder=getcwd();
>
> How do I include this function in my script as a subroutine
> to make it truely a 'standalone' script which
> will run as
> a:\perl.exe c:\temp\script.pl
>
> Thanks in advance,
>
> Bill
Bill,
Not sure you can. However,
$folder = `cd`;
will give you pretty much the same results.
HTH,
Garry
------------------------------
Date: 14 Jul 2003 10:39:12 GMT
From: "Tassilo v. Parseval" <tassilo.parseval@rwth-aachen.de>
Subject: Re: Standalone Perlscript
Message-Id: <beu18g$mvb$1@nets3.rz.RWTH-Aachen.DE>
Also sprach William Hymen:
> I have a perl script which I would like
> to run 'standalone'. In other words, I ONLY want
> to have gnu perl.exe available, and nothing more.
Impossible. There is no such thing as a 'gnu perl.exe'. :-)
> I am not permitted to install perl in a production
> environment on NT or W2K here at work.
>
> The only function I need to include in the
> script is cwd. Which is used as
> $folder=getcwd();
>
> How do I include this function in my script as a subroutine
> to make it truely a 'standalone' script which
> will run as
> a:\perl.exe c:\temp\script.pl
This is not going to work. perl.exe most probably relies on some DLLs
that need to be around as well. Head over to the CPAN and have a look at
the PAR module. It contains a script that will turn any Perl script into
something that can run on its own.
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
------------------------------
Date: Mon, 14 Jul 2003 11:22:05 +0000 (UTC)
From: rdwillia@hgmp.mrc.ac.uk (Richard Williams)
Subject: Re: Standalone Perlscript
Message-Id: <beu3ot$sjl$1@niobium.hgmp.mrc.ac.uk>
In article <beu18g$mvb$1@nets3.rz.RWTH-Aachen.DE>,
Tassilo v. Parseval <tassilo.parseval@post.rwth-aachen.de> wrote:
>Also sprach William Hymen:
>> I am not permitted to install perl in a production
>> environment on NT or W2K here at work.
>>
>> The only function I need to include in the
>> script is cwd. Which is used as
>> $folder=getcwd();
>>
>> How do I include this function in my script as a subroutine
>> to make it truely a 'standalone' script which
>> will run as
>> a:\perl.exe c:\temp\script.pl
>
>This is not going to work. perl.exe most probably relies on some DLLs
>that need to be around as well. Head over to the CPAN and have a look at
>the PAR module. It contains a script that will turn any Perl script into
>something that can run on its own.
Another alternative is tinyperl (http://tinyperl.sourceforge.net/) which I
think will do what you want out of the box. The package contains a perl
interpreter supported by a single .dll and a minimal compressed library
that includes Cwd.pm. Everything should fit on a floppy.
Richard.
------------------------------
Date: Mon, 14 Jul 2003 11:26:01 -0000
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <vh54q94rsl0497@corp.supernews.com>
Following is a summary of articles spanning a 7 day period,
beginning at 07 Jul 2003 11:38:38 GMT and ending at
14 Jul 2003 10:39:12 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 2003 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Excluded Posters
================
perlfaq-suggestions\@(?:.*\.)?perl\.com
faq\@(?:.*\.)?denver\.pm\.org
comdog\@panix\.com
Totals
======
Posters: 231
Articles: 656 (250 with cutlined signatures)
Threads: 172
Volume generated: 1347.8 kb
- headers: 570.7 kb (10,887 lines)
- bodies: 750.7 kb (24,975 lines)
- original: 465.5 kb (16,289 lines)
- signatures: 25.8 kb (697 lines)
Original Content Rating: 0.620
Averages
========
Posts per poster: 2.8
median: 2 posts
mode: 1 post - 114 posters
s: 3.5 posts
Posts per thread: 3.8
median: 3.0 posts
mode: 2 posts - 37 threads
s: 3.2 posts
Message size: 2103.9 bytes
- header: 890.8 bytes (16.6 lines)
- body: 1171.8 bytes (38.1 lines)
- original: 726.7 bytes (24.8 lines)
- signature: 40.3 bytes (1.1 lines)
Top 20 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
23 73.0 ( 26.1/ 44.0/ 40.2) tadmc@augustmail.com
20 44.3 ( 21.8/ 22.3/ 13.7) "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
18 41.2 ( 19.0/ 21.9/ 10.9) bwalton@rochester.rr.com
17 31.5 ( 15.1/ 14.1/ 13.1) abigail@abigail.nl
17 32.8 ( 11.0/ 18.7/ 13.2) Greg Bacon <gbacon@hiwaay.net>
16 32.8 ( 15.0/ 16.7/ 8.4) Gunnar Hjalmarsson <noreply@gunnar.cc>
12 18.0 ( 11.6/ 6.4/ 3.7) Bart Lateur <bart.lateur@pandora.be>
12 30.2 ( 15.1/ 14.0/ 7.7) "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
12 24.3 ( 8.5/ 15.8/ 10.0) Jay Tilton <tiltonj@erols.com>
11 22.7 ( 11.1/ 11.6/ 5.1) "Robert" <yyyy@yyy.com>
11 15.8 ( 9.2/ 4.2/ 1.9) Tina Mueller <usenet@expires082003.tinita.de>
11 23.5 ( 9.1/ 14.2/ 4.4) Michael Budash <mbudash@sonic.net>
10 19.8 ( 7.6/ 12.2/ 5.8) Sara <genericax@hotmail.com>
9 17.7 ( 8.0/ 8.5/ 5.2) Eric Schwartz <emschwar@pobox.com>
9 12.0 ( 6.1/ 5.9/ 3.5) Helgi Briem <helgi@decode.is>
8 20.1 ( 7.5/ 10.8/ 4.4) tassilo.parseval@post.rwth-aachen.de
8 25.9 ( 6.1/ 18.4/ 8.9) Benjamin Goldberg <ben.goldberg@hotpop.com>
7 10.9 ( 6.4/ 4.4/ 1.3) "J. Gleixner" <glex_nospam@qwest.net>
7 16.4 ( 6.3/ 8.9/ 5.6) Michele Dondi <bik.mido@tiscalinet.it>
7 10.9 ( 5.6/ 5.3/ 3.3) =?ISO-8859-1?Q?Stefan_Fischerl=E4nder?= <fischerlaender@gmx.de>
These posters accounted for 37.3% of all articles.
Top 20 Posters by Number of Followups
=====================================
(kb) (kb) (kb) (kb)
Followups Volume ( hdr/ body/ orig) Address
--------- -------------------------- -------
21 73.0 ( 26.1/ 44.0/ 40.2) tadmc@augustmail.com
18 44.3 ( 21.8/ 22.3/ 13.7) "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
18 41.2 ( 19.0/ 21.9/ 10.9) bwalton@rochester.rr.com
17 31.5 ( 15.1/ 14.1/ 13.1) abigail@abigail.nl
17 32.8 ( 11.0/ 18.7/ 13.2) Greg Bacon <gbacon@hiwaay.net>
15 32.8 ( 15.0/ 16.7/ 8.4) Gunnar Hjalmarsson <noreply@gunnar.cc>
12 18.0 ( 11.6/ 6.4/ 3.7) Bart Lateur <bart.lateur@pandora.be>
12 24.3 ( 8.5/ 15.8/ 10.0) Jay Tilton <tiltonj@erols.com>
12 30.2 ( 15.1/ 14.0/ 7.7) "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
11 23.5 ( 9.1/ 14.2/ 4.4) Michael Budash <mbudash@sonic.net>
11 15.8 ( 9.2/ 4.2/ 1.9) Tina Mueller <usenet@expires082003.tinita.de>
9 17.7 ( 8.0/ 8.5/ 5.2) Eric Schwartz <emschwar@pobox.com>
9 12.0 ( 6.1/ 5.9/ 3.5) Helgi Briem <helgi@decode.is>
8 25.9 ( 6.1/ 18.4/ 8.9) Benjamin Goldberg <ben.goldberg@hotpop.com>
8 19.8 ( 7.6/ 12.2/ 5.8) Sara <genericax@hotmail.com>
8 22.7 ( 11.1/ 11.6/ 5.1) "Robert" <yyyy@yyy.com>
8 20.1 ( 7.5/ 10.8/ 4.4) tassilo.parseval@post.rwth-aachen.de
7 10.9 ( 6.4/ 4.4/ 1.3) "J. Gleixner" <glex_nospam@qwest.net>
7 14.7 ( 5.7/ 8.4/ 4.2) nanae@perusion.net
7 14.5 ( 6.0/ 8.5/ 5.4) Garry Short <g4rry_short@zw4llet.com>
These posters accounted for 45.3% of all followups.
Top 13 Posters by Followup Rate (min. of ten posts)
===================================================
Followup
Rate Followups Posts Address
-------- --------- ----- -------
100.00% 11 11 Tina Mueller <usenet@expires082003.tinita.de>
100.00% 17 17 Greg Bacon <gbacon@hiwaay.net>
100.00% 12 12 Jay Tilton <tiltonj@erols.com>
100.00% 12 12 Bart Lateur <bart.lateur@pandora.be>
100.00% 17 17 abigail@abigail.nl
100.00% 18 18 bwalton@rochester.rr.com
100.00% 12 12 "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
100.00% 11 11 Michael Budash <mbudash@sonic.net>
93.75% 15 16 Gunnar Hjalmarsson <noreply@gunnar.cc>
91.30% 21 23 tadmc@augustmail.com
90.00% 18 20 "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
80.00% 8 10 Sara <genericax@hotmail.com>
72.73% 8 11 "Robert" <yyyy@yyy.com>
Top 20 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
73.0 ( 26.1/ 44.0/ 40.2) 23 tadmc@augustmail.com
44.3 ( 21.8/ 22.3/ 13.7) 20 "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
41.2 ( 19.0/ 21.9/ 10.9) 18 bwalton@rochester.rr.com
32.8 ( 15.0/ 16.7/ 8.4) 16 Gunnar Hjalmarsson <noreply@gunnar.cc>
32.8 ( 11.0/ 18.7/ 13.2) 17 Greg Bacon <gbacon@hiwaay.net>
31.5 ( 15.1/ 14.1/ 13.1) 17 abigail@abigail.nl
30.2 ( 15.1/ 14.0/ 7.7) 12 "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
25.9 ( 6.1/ 18.4/ 8.9) 8 Benjamin Goldberg <ben.goldberg@hotpop.com>
24.3 ( 8.5/ 15.8/ 10.0) 12 Jay Tilton <tiltonj@erols.com>
23.5 ( 9.1/ 14.2/ 4.4) 11 Michael Budash <mbudash@sonic.net>
22.7 ( 11.1/ 11.6/ 5.1) 11 "Robert" <yyyy@yyy.com>
20.1 ( 7.5/ 10.8/ 4.4) 8 tassilo.parseval@post.rwth-aachen.de
19.9 ( 4.9/ 14.2/ 9.7) 5 mgjv@tradingpost.com.au
19.8 ( 7.6/ 12.2/ 5.8) 10 Sara <genericax@hotmail.com>
19.6 ( 5.5/ 14.1/ 5.6) 7 Bryan Castillo <rook_5150@yahoo.com>
19.1 ( 0.6/ 18.5/ 18.4) 1 "Chris Abraham" <cja@dds.nl>
18.0 ( 11.6/ 6.4/ 3.7) 12 Bart Lateur <bart.lateur@pandora.be>
17.7 ( 8.0/ 8.5/ 5.2) 9 Eric Schwartz <emschwar@pobox.com>
16.8 ( 3.6/ 13.2/ 6.1) 3 Zvone Zagar <zvone.zagar@siol.net>
16.8 ( 0.4/ 16.3/ 16.3) 1 Greg Bacon <gbacon@cs.uah.edu>
These posters accounted for 40.8% of the total volume.
Top 13 Posters by Volume of Original Content (min. ten posts)
=============================================================
(kb)
Posts orig Address
----- ----- -------
23 40.2 tadmc@augustmail.com
20 13.7 "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
17 13.2 Greg Bacon <gbacon@hiwaay.net>
17 13.1 abigail@abigail.nl
18 10.9 bwalton@rochester.rr.com
12 10.0 Jay Tilton <tiltonj@erols.com>
16 8.4 Gunnar Hjalmarsson <noreply@gunnar.cc>
12 7.7 "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
10 5.8 Sara <genericax@hotmail.com>
11 5.1 "Robert" <yyyy@yyy.com>
11 4.4 Michael Budash <mbudash@sonic.net>
12 3.7 Bart Lateur <bart.lateur@pandora.be>
11 1.9 Tina Mueller <usenet@expires082003.tinita.de>
These posters accounted for 29.6% of the original volume.
Top 13 Posters by OCR (minimum of ten posts)
============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.931 ( 13.1 / 14.1) 17 abigail@abigail.nl
0.912 ( 40.2 / 44.0) 23 tadmc@augustmail.com
0.708 ( 13.2 / 18.7) 17 Greg Bacon <gbacon@hiwaay.net>
0.633 ( 10.0 / 15.8) 12 Jay Tilton <tiltonj@erols.com>
0.613 ( 13.7 / 22.3) 20 "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
0.580 ( 3.7 / 6.4) 12 Bart Lateur <bart.lateur@pandora.be>
0.552 ( 7.7 / 14.0) 12 "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
0.501 ( 8.4 / 16.7) 16 Gunnar Hjalmarsson <noreply@gunnar.cc>
0.496 ( 10.9 / 21.9) 18 bwalton@rochester.rr.com
0.478 ( 5.8 / 12.2) 10 Sara <genericax@hotmail.com>
0.448 ( 1.9 / 4.2) 11 Tina Mueller <usenet@expires082003.tinita.de>
0.435 ( 5.1 / 11.6) 11 "Robert" <yyyy@yyy.com>
0.309 ( 4.4 / 14.2) 11 Michael Budash <mbudash@sonic.net>
Bottom 13 Posters by OCR (minimum of ten posts)
===============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.931 ( 13.1 / 14.1) 17 abigail@abigail.nl
0.912 ( 40.2 / 44.0) 23 tadmc@augustmail.com
0.708 ( 13.2 / 18.7) 17 Greg Bacon <gbacon@hiwaay.net>
0.633 ( 10.0 / 15.8) 12 Jay Tilton <tiltonj@erols.com>
0.613 ( 13.7 / 22.3) 20 "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
0.580 ( 3.7 / 6.4) 12 Bart Lateur <bart.lateur@pandora.be>
0.552 ( 7.7 / 14.0) 12 "A. Sinan Unur" <asu1@c-o-r-n-e-l-l.edu>
0.501 ( 8.4 / 16.7) 16 Gunnar Hjalmarsson <noreply@gunnar.cc>
0.496 ( 10.9 / 21.9) 18 bwalton@rochester.rr.com
0.478 ( 5.8 / 12.2) 10 Sara <genericax@hotmail.com>
0.448 ( 1.9 / 4.2) 11 Tina Mueller <usenet@expires082003.tinita.de>
0.435 ( 5.1 / 11.6) 11 "Robert" <yyyy@yyy.com>
0.309 ( 4.4 / 14.2) 11 Michael Budash <mbudash@sonic.net>
13 posters (5%) had at least ten posts.
Top 20 Threads by Number of Posts
=================================
Posts Subject
----- -------
21 Perl Script Problems
17 Remove line
17 How do I clone a structure?
14 Fastest way to build a hash
14 Help with Perl Script
10 How to retrieve a scalar name in a foreach loop
10 creating a directory with cgi and owner ends up as apache
10 Total Butt Heads in this news group
9 Regular expression imesh and timesheet
9 Need help with wwwboard perl cgi script
9 string question
8 oneliner failed on Win2k with space in path name
8 Big hash question
8 flock() and W95
8 Matt's Simple Search - a new angle?
7 Comparing two files..
7 references => how not to destroy my data ?
7 Perl 5.8.0 compilation fails in chrooted environment
7 p book
7 Hanging pipes in CGI Perl
These threads accounted for 31.6% of all articles.
Top 20 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
43.8 ( 22.3/ 21.0/ 11.5) 21 Perl Script Problems
36.9 ( 15.2/ 19.7/ 11.1) 17 How do I clone a structure?
35.5 ( 15.2/ 18.7/ 10.5) 17 Remove line
34.0 ( 2.0/ 32.0/ 32.0) 2 Posting Guidelines for comp.lang.perl.misc ($Revision: 1.4 $)
27.0 ( 12.7/ 14.0/ 8.4) 14 Fastest way to build a hash
25.6 ( 12.0/ 13.6/ 6.6) 14 Help with Perl Script
24.3 ( 6.2/ 18.1/ 7.9) 5 Reading JPEG file
22.0 ( 2.1/ 19.8/ 19.2) 3 Why is it Not Writing to File on Netware 5 Box?
21.9 ( 4.7/ 17.1/ 10.5) 6 Dynamically generating multi-table SQL
21.8 ( 5.6/ 15.6/ 6.7) 7 references => how not to destroy my data ?
20.8 ( 7.6/ 13.1/ 6.5) 8 Matt's Simple Search - a new angle?
20.7 ( 9.8/ 10.6/ 4.1) 9 Need help with wwwboard perl cgi script
20.5 ( 9.0/ 10.5/ 5.7) 10 How to retrieve a scalar name in a foreach loop
18.7 ( 7.1/ 10.7/ 6.7) 7 Alternative to use vars
18.1 ( 6.8/ 10.8/ 5.5) 8 flock() and W95
18.0 ( 6.9/ 10.8/ 7.3) 7 Hanging pipes in CGI Perl
17.6 ( 2.9/ 14.7/ 11.1) 4 Perl code question
17.2 ( 7.5/ 9.5/ 4.8) 8 oneliner failed on Win2k with space in path name
16.8 ( 0.4/ 16.3/ 16.3) 1 Statistics for comp.lang.perl.misc
16.4 ( 7.1/ 8.7/ 5.3) 8 Big hash question
These threads accounted for 35.4% of the total volume.
Top 8 Threads by OCR (minimum of ten posts)
===========================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.599 ( 8.4/ 14.0) 14 Fastest way to build a hash
0.562 ( 11.1/ 19.7) 17 How do I clone a structure?
0.561 ( 10.5/ 18.7) 17 Remove line
0.547 ( 5.7/ 10.5) 10 How to retrieve a scalar name in a foreach loop
0.547 ( 11.5/ 21.0) 21 Perl Script Problems
0.484 ( 6.6/ 13.6) 14 Help with Perl Script
0.436 ( 1.6/ 3.6) 10 Total Butt Heads in this news group
0.406 ( 2.7/ 6.8) 10 creating a directory with cgi and owner ends up as apache
Bottom 8 Threads by OCR (minimum of ten posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.599 ( 8.4 / 14.0) 14 Fastest way to build a hash
0.562 ( 11.1 / 19.7) 17 How do I clone a structure?
0.561 ( 10.5 / 18.7) 17 Remove line
0.547 ( 5.7 / 10.5) 10 How to retrieve a scalar name in a foreach loop
0.547 ( 11.5 / 21.0) 21 Perl Script Problems
0.484 ( 6.6 / 13.6) 14 Help with Perl Script
0.436 ( 1.6 / 3.6) 10 Total Butt Heads in this news group
0.406 ( 2.7 / 6.8) 10 creating a directory with cgi and owner ends up as apache
8 threads (4%) had at least ten posts.
Top 9 Targets for Crossposts
============================
Articles Newsgroup
-------- ---------
11 comp.lang.perl.modules
5 comp.lang.perl
4 alt.perl
3 comp.infosystems.www.authoring.html
3 comp.lang.java.help
2 mailing.database.mysql
2 comp.lang.perl.tk
1 news.answers
1 comp.answers
Top 20 Crossposters
===================
Articles Address
-------- -------
4 "Stacey" <stacye@optonline.net>
3 Eric Schwartz <emschwar@pobox.com>
3 Gene Mat <geneSPAMAWAYmat@yahoo.com>
2 <jari.aalto@poboxes.com> (Jari Aalto+mail.perl)
2 "Miguel De Anda" <_nospam_sodamnamd@hotmail.com>
2 Helgi Briem <helgi@decode.is>
2 "John Giblin" <jwgiblin3@hotmail.com>
1 Bruno Carpentieri <carpenti@cerfacs.fr>
1 Joe Smith <inwap@inwap.com>
1 mgjv@tradingpost.com.au
1 w i l l <willis_31_40@yahoo.com>
1 Mark Grimes <mark_usenet@peculiarities.com>
1 deepak p <deepak10000@hotmail.com>
1 "dw" <me@verizon.invalid>
1 "nreedr" <infomatic@aol.com>
1 motiv8xREMOVETHIS@top25web.com
1 "Dan Ayers" <Daniel.Ayers@ir.com>
1 tadmc@augustmail.com
1 =?ISO-8859-1?Q?Steffen_M=FCller?= <sv99oya02@sneakemail.com>
1 Jose Gilberto Torres <jogeedaklown69@yahoo.com>
------------------------------
Date: Mon, 14 Jul 2003 04:58:05 GMT
From: Charlton Wilbur <cwilbur@mithril.chromatico.net>
Subject: Re: Synchronizing two ftp sites/folders
Message-Id: <87fzl9g11p.fsf@mithril.chromatico.net>
Perusion Hostmaster <nanae@perusion.com> writes:
> Cygwin has a working rsync too, and now that Mac OS/X is out it
> should be there as well (though I don't know that for sure).
Not installed by default, but easy enough to.
Charlton
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 5221
***************************************
