[28517] in Perl-Users-Digest
Perl-Users Digest, Issue: 9881 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 23 18:05:55 2006
Date: Mon, 23 Oct 2006 15:05:07 -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 Oct 2006 Volume: 10 Number: 9881
Today's topics:
Re: ability to match / detect acronyms ? <jwkenne@attglobal.net>
Can't find string terminator ... <trudge@softouch.on.ca>
Re: Can't find string terminator ... <john@castleamber.com>
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: Can't find string terminator ... <john@castleamber.com>
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: Can't find string terminator ... xhoster@gmail.com
Re: Can't find string terminator ... <tintin@invalid.invalid>
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: Can't find string terminator ... xhoster@gmail.com
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: Can't find string terminator ... <softouch@softouch.on.ca>
Re: command to substitute x with y, but only x alone <bootiack@yahoo.com>
cpu idle measurement: sar/vmstat <inetquestion@hotmail.com>
Error installing Apache::Request <tidusx2@cogeco.ca>
Re: Error installing Apache::Request <kkeller-usenet@wombat.san-francisco.ca.us>
File and directory permissions <ismael.pernas.c@gmail.es>
Re: File and directory permissions <mritty@gmail.com>
Re: FTP to a windows file share? <veatchla@yahoo.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 23 Oct 2006 12:56:58 -0400
From: "John W. Kennedy" <jwkenne@attglobal.net>
Subject: Re: ability to match / detect acronyms ?
Message-Id: <Sv6%g.15$OY.5@newsfe11.lga>
Josef Moellers wrote:
> John W. Kennedy wrote:
>> anno4000@radom.zrz.tu-berlin.de wrote:
>>
>>> Jack <jack_posemsky@yahoo.com> wrote in comp.lang.perl.misc:
>>>
>>>> Jack wrote:
>>>>
>>>>> Hi I was wondering if anyone had any code to detect / match / identify
>>>>> acronyms (AAA, BD) , essentially these are non words..besides just
>>>>> detecting the capitals of course.
>>>
>>>
>>> Some acronyms are words,
>>
>>
>> All acronyms are words, by definition.
>
> There are acronyms that
> 1. you couldn't pronounce, e.g. WWW,
Not an acronym.
> 2. you can pronounce (in some language) but they aren't "proper words"
> in most languages, e.g. "USA"
Not an acronym.
--
John W. Kennedy
"The blind rulers of Logres
Nourished the land on a fallacy of rational virtue."
-- Charles Williams. "Taliessin through Logres: Prelude"
------------------------------
Date: 23 Oct 2006 12:24:10 -0700
From: "Trudge" <trudge@softouch.on.ca>
Subject: Can't find string terminator ...
Message-Id: <1161631450.832297.271190@h48g2000cwc.googlegroups.com>
This is driving me crazy. I've been programming Perl for several years,
and love the 'here' document capability. I know how it works, and use
it in almost every script I write. I've done the Google group search
and read most of the postings, but no answers to my particular problem.
My development environment is Windows 2000 Pro, running Apache (1.3.29
and 2.0.52) and ActiveState Perl 5.x. I've been developing under this
scenario for a couple of years. I use TextPad as my editor. I haven't
made any changes to anything in the environment. Most of my scripts end
up on *nix boxes, and they all work just fine there.
Lately I noticed this on my home machine when running a test script:
Can't find string terminator "EndOfText" anywhere before EOF at test.pl
line 12 (#1)
(F) Perl strings can stretch over multiple lines. This message
means
that the closing delimiter was omitted. Because bracketed quotes
count
nesting levels, the following is missing its final parenthesis:
print q(The character '(' starts a side comment.);
If you're getting this error from a here-document, you may have
included
unseen whitespace before or after your closing tag. A good
programmer's
editor will have a way to help you find these characters.
Uncaught exception from user code:
Can't find string terminator "EndOfText" anywhere before EOF at
test.pl line 12.
at test.pl line 12
Here's the code:
#! /usr/bin/perl -w
BEGIN
{
open (STDERR,">>$0-err.txt");
print STDERR "\n",scalar localtime,"\n";
}
use diagnostics;
print "Content-type:text/plain\n\n";
print <<EndOfText;
Why doesn't this work?
EndOfText
I've checked this for syntax umpteen times and can't find anything
wrong. There is a hard-return after 'EndOfText' and it is at the left
margin. I run it through the server in a browser window and from the
command line, but still get the same result.
It's like an EOF character is buried in there somewhere. Which leads me
to wonder if TextPad has been corrupted to save files in a funky format
or something.
Anyone that has any ideas on this would you please respond either here
(for the rest of the group) and/or to my personal email.
Thanks.
--
------------------------------
Date: 23 Oct 2006 20:06:58 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: Can't find string terminator ...
Message-Id: <Xns986599C4FD81Fcastleamber@130.133.1.4>
"Trudge" <trudge@softouch.on.ca> wrote:
> print <<EndOfText;
> Why doesn't this work?
> EndOfText
Put the cursor just after the t and press return.
Configure your editor to trim tailing spaces/tabs. (Textpad can do this).
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Mon, 23 Oct 2006 16:25:51 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <7z9%g.172864$sS1.115881@read1.cgocable.net>
John Bokma wrote:
> "Trudge" <trudge@softouch.on.ca> wrote:
>
>> print <<EndOfText;
>> Why doesn't this work?
>> EndOfText
>
> Put the cursor just after the t and press return.
>
> Configure your editor to trim tailing spaces/tabs. (Textpad can do this).
>
Did both. Still get the same results.
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: 23 Oct 2006 20:34:44 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: Can't find string terminator ...
Message-Id: <Xns98659E79C5631castleamber@130.133.1.4>
Amer Neely <softouch@softouch.on.ca> wrote:
> John Bokma wrote:
>> "Trudge" <trudge@softouch.on.ca> wrote:
>>
>>> print <<EndOfText;
>>> Why doesn't this work?
>>> EndOfText
>>
>> Put the cursor just after the t and press return.
>>
>> Configure your editor to trim tailing spaces/tabs. (Textpad can do
>> this).
>>
>
> Did both. Still get the same results.
C:\Documents and Settings\John\My Documents>eot.pl
Why doesn't this work?
C:\Documents and Settings\John\My Documents>type eot.pl
print <<EndOfText;
Why doesn't this work?
EndOfText
C:\Documents and Settings\John\My Documents>
You're sure there is a newline after EndOfText?
Might be that you have accidently pressed a key combination that inserts a
hidden character in your terminator. I would delete EndOfText (twice), and
type it in again (once), and copy it.
--
John Experienced Perl programmer: http://castleamber.com/
Perl help, tutorials, and examples: http://johnbokma.com/perl/
------------------------------
Date: Mon, 23 Oct 2006 16:42:52 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <4P9%g.172865$sS1.170902@read1.cgocable.net>
John Bokma wrote:
> Amer Neely <softouch@softouch.on.ca> wrote:
>
>> John Bokma wrote:
>>> "Trudge" <trudge@softouch.on.ca> wrote:
>>>
>>>> print <<EndOfText;
>>>> Why doesn't this work?
>>>> EndOfText
>>> Put the cursor just after the t and press return.
>>>
>>> Configure your editor to trim tailing spaces/tabs. (Textpad can do
>>> this).
>>>
>> Did both. Still get the same results.
>
>
> C:\Documents and Settings\John\My Documents>eot.pl
> Why doesn't this work?
>
> C:\Documents and Settings\John\My Documents>type eot.pl
> print <<EndOfText;
> Why doesn't this work?
> EndOfText
>
> C:\Documents and Settings\John\My Documents>
>
> You're sure there is a newline after EndOfText?
>
> Might be that you have accidently pressed a key combination that inserts a
> hidden character in your terminator. I would delete EndOfText (twice), and
> type it in again (once), and copy it.
>
Believe me, I've tried everything I can think of to ensure there is
nothing else on that line except the newline at the end. There is
something very strange going on here.
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
v: 705.223.3539
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: Mon, 23 Oct 2006 16:48:54 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <KU9%g.122043$ED.20493@read2.cgocable.net>
Amer Neely wrote:
> John Bokma wrote:
>> Amer Neely <softouch@softouch.on.ca> wrote:
>>
>>> John Bokma wrote:
>>>> "Trudge" <trudge@softouch.on.ca> wrote:
>>>>
>>>>> print <<EndOfText;
>>>>> Why doesn't this work?
>>>>> EndOfText
>>>> Put the cursor just after the t and press return.
>>>>
>>>> Configure your editor to trim tailing spaces/tabs. (Textpad can do
>>>> this).
>>> Did both. Still get the same results.
>>
>>
>> C:\Documents and Settings\John\My Documents>eot.pl
>> Why doesn't this work?
>>
>> C:\Documents and Settings\John\My Documents>type eot.pl
>> print <<EndOfText;
>> Why doesn't this work?
>> EndOfText
>>
>> C:\Documents and Settings\John\My Documents>
>>
>> You're sure there is a newline after EndOfText?
>>
>> Might be that you have accidently pressed a key combination that
>> inserts a hidden character in your terminator. I would delete
>> EndOfText (twice), and type it in again (once), and copy it.
>>
>
> Believe me, I've tried everything I can think of to ensure there is
> nothing else on that line except the newline at the end. There is
> something very strange going on here.
>
I checked the apache logs and get a slightly different error:
[Mon Oct 23 16:45:12 2006] [error] [client 127.0.0.1] Premature end of
script headers: d:/httpd/cgi-bin/hasbeans/dev/test.pl
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
v: 705.223.3539
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: 23 Oct 2006 20:51:53 GMT
From: xhoster@gmail.com
Subject: Re: Can't find string terminator ...
Message-Id: <20061023165208.611$1D@newsreader.com>
Amer Neely <softouch@softouch.on.ca> wrote:
>
> Believe me, I've tried everything I can think of to ensure there is
> nothing else on that line except the newline at the end. There is
> something very strange going on here.
perl -0777 -ne 'print ord, "\t$_\n" foreach split //' eot.pl
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Tue, 24 Oct 2006 10:01:27 +1300
From: "Tintin" <tintin@invalid.invalid>
Subject: Re: Can't find string terminator ...
Message-Id: <453d1ff1$0$19728$88260bb3@free.teranews.com>
"Trudge" <trudge@softouch.on.ca> wrote in message
news:1161631450.832297.271190@h48g2000cwc.googlegroups.com...
> This is driving me crazy. I've been programming Perl for several years,
> and love the 'here' document capability. I know how it works, and use
> it in almost every script I write. I've done the Google group search
> and read most of the postings, but no answers to my particular problem.
>
> My development environment is Windows 2000 Pro, running Apache (1.3.29
> and 2.0.52) and ActiveState Perl 5.x. I've been developing under this
> scenario for a couple of years. I use TextPad as my editor. I haven't
> made any changes to anything in the environment. Most of my scripts end
> up on *nix boxes, and they all work just fine there.
>
> Lately I noticed this on my home machine when running a test script:
> Can't find string terminator "EndOfText" anywhere before EOF at test.pl
> line 12 (#1)
> (F) Perl strings can stretch over multiple lines. This message
> means
> that the closing delimiter was omitted. Because bracketed quotes
> count
> nesting levels, the following is missing its final parenthesis:
>
> print q(The character '(' starts a side comment.);
>
> If you're getting this error from a here-document, you may have
> included
> unseen whitespace before or after your closing tag. A good
> programmer's
> editor will have a way to help you find these characters.
>
> Uncaught exception from user code:
> Can't find string terminator "EndOfText" anywhere before EOF at
> test.pl line 12.
> at test.pl line 12
>
> Here's the code:
> #! /usr/bin/perl -w
> BEGIN
> {
> open (STDERR,">>$0-err.txt");
> print STDERR "\n",scalar localtime,"\n";
> }
>
> use diagnostics;
>
> print "Content-type:text/plain\n\n";
>
> print <<EndOfText;
> Why doesn't this work?
> EndOfText
>
> I've checked this for syntax umpteen times and can't find anything
> wrong. There is a hard-return after 'EndOfText' and it is at the left
> margin. I run it through the server in a browser window and from the
> command line, but still get the same result.
>
> It's like an EOF character is buried in there somewhere. Which leads me
> to wonder if TextPad has been corrupted to save files in a funky format
> or something.
What is the hex or octal output of those last 3 lines?
--
Posted via a free Usenet account from http://www.teranews.com
------------------------------
Date: Mon, 23 Oct 2006 16:59:23 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <z2a%g.122045$ED.46694@read2.cgocable.net>
xhoster@gmail.com wrote:
> Amer Neely <softouch@softouch.on.ca> wrote:
>> Believe me, I've tried everything I can think of to ensure there is
>> nothing else on that line except the newline at the end. There is
>> something very strange going on here.
>
> perl -0777 -ne 'print ord, "\t$_\n" foreach split //' eot.pl
>
> Xho
>
D:\httpd\cgi-bin\hasbeans\dev>perl -0777 -ne 'print ord,"\t$_\n" foreach
split //' test.pl
Can't find string terminator "'" anywhere before EOF at -e line 1.
D:\httpd\cgi-bin\hasbeans\dev>
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
v: 705.223.3539
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: 23 Oct 2006 21:04:20 GMT
From: xhoster@gmail.com
Subject: Re: Can't find string terminator ...
Message-Id: <20061023170435.490$tO@newsreader.com>
Amer Neely <softouch@softouch.on.ca> wrote:
> xhoster@gmail.com wrote:
> > Amer Neely <softouch@softouch.on.ca> wrote:
> >> Believe me, I've tried everything I can think of to ensure there is
> >> nothing else on that line except the newline at the end. There is
> >> something very strange going on here.
> >
> > perl -0777 -ne 'print ord, "\t$_\n" foreach split //' eot.pl
> >
> > Xho
> >
> D:\httpd\cgi-bin\hasbeans\dev>perl -0777 -ne 'print ord,"\t$_\n" foreach
> split //' test.pl
> Can't find string terminator "'" anywhere before EOF at -e line 1.
Yeah, you got to switch it to MSWindows CLI format:
perl -0777 -ne "print ord, qq{\t$_\n} foreach split //" eot.pl
(and change. eot.pl to whatever file name you acutally used)
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Mon, 23 Oct 2006 17:11:13 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <Fda%g.172868$sS1.20540@read1.cgocable.net>
Tintin wrote:
> "Trudge" <trudge@softouch.on.ca> wrote in message
> news:1161631450.832297.271190@h48g2000cwc.googlegroups.com...
>> This is driving me crazy. I've been programming Perl for several years,
>> and love the 'here' document capability. I know how it works, and use
>> it in almost every script I write. I've done the Google group search
>> and read most of the postings, but no answers to my particular problem.
>>
>> My development environment is Windows 2000 Pro, running Apache (1.3.29
>> and 2.0.52) and ActiveState Perl 5.x. I've been developing under this
>> scenario for a couple of years. I use TextPad as my editor. I haven't
>> made any changes to anything in the environment. Most of my scripts end
>> up on *nix boxes, and they all work just fine there.
>>
>> Lately I noticed this on my home machine when running a test script:
>> Can't find string terminator "EndOfText" anywhere before EOF at test.pl
>> line 12 (#1)
>> (F) Perl strings can stretch over multiple lines. This message
>> means
>> that the closing delimiter was omitted. Because bracketed quotes
>> count
>> nesting levels, the following is missing its final parenthesis:
>>
>> print q(The character '(' starts a side comment.);
>>
>> If you're getting this error from a here-document, you may have
>> included
>> unseen whitespace before or after your closing tag. A good
>> programmer's
>> editor will have a way to help you find these characters.
>>
>> Uncaught exception from user code:
>> Can't find string terminator "EndOfText" anywhere before EOF at
>> test.pl line 12.
>> at test.pl line 12
>>
>> Here's the code:
>> #! /usr/bin/perl -w
>> BEGIN
>> {
>> open (STDERR,">>$0-err.txt");
>> print STDERR "\n",scalar localtime,"\n";
>> }
>>
>> use diagnostics;
>>
>> print "Content-type:text/plain\n\n";
>>
>> print <<EndOfText;
>> Why doesn't this work?
>> EndOfText
>>
>> I've checked this for syntax umpteen times and can't find anything
>> wrong. There is a hard-return after 'EndOfText' and it is at the left
>> margin. I run it through the server in a browser window and from the
>> command line, but still get the same result.
>>
>> It's like an EOF character is buried in there somewhere. Which leads me
>> to wonder if TextPad has been corrupted to save files in a funky format
>> or something.
>
> What is the hex or octal output of those last 3 lines?
Hmmm. This is interesting. I loaded the file as a binary into TextPad,
and there is 0D 0D 0A after the final 't'. So an extra line-feed seems
to have crept in there.
Good call :) Now to fix the bloody problem.
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
v: 705.223.3539
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: Mon, 23 Oct 2006 17:20:51 -0400
From: Amer Neely <softouch@softouch.on.ca>
Subject: Re: Can't find string terminator ...
Message-Id: <Gma%g.172870$sS1.166223@read1.cgocable.net>
xhoster@gmail.com wrote:
> Amer Neely <softouch@softouch.on.ca> wrote:
>> xhoster@gmail.com wrote:
>>> Amer Neely <softouch@softouch.on.ca> wrote:
>>>> Believe me, I've tried everything I can think of to ensure there is
>>>> nothing else on that line except the newline at the end. There is
>>>> something very strange going on here.
>>> perl -0777 -ne 'print ord, "\t$_\n" foreach split //' eot.pl
>>>
>>> Xho
>>>
>> D:\httpd\cgi-bin\hasbeans\dev>perl -0777 -ne 'print ord,"\t$_\n" foreach
>> split //' test.pl
>> Can't find string terminator "'" anywhere before EOF at -e line 1.
>
> Yeah, you got to switch it to MSWindows CLI format:
>
> perl -0777 -ne "print ord, qq{\t$_\n} foreach split //" eot.pl
>
> (and change. eot.pl to whatever file name you acutally used)
>
> Xho
>
Thanks.
Got it:
D:\httpd\cgi-bin\hasbeans\dev>perl -0777 -ne "print ord,qq{\t$_\n}
foreach split //" test.pl
35 #
33 !
32
47 /
117 u
115 s
114 r
47 /
98 b
105 i
110 n
47 /
112 p
101 e
114 r
108 l
32
45 -
119 w
13
10
66 B
69 E
71 G
73 I
78 N
13
10
123 {
13
10
9
111 o
112 p
101 e
110 n
32
40 (
83 S
84 T
68 D
69 E
82 R
82 R
44 ,
34 "
62 >
62 >
36 $
48 0
45 -
101 e
114 r
114 r
46 .
116 t
120 x
116 t
34 "
41 )
59 ;
13
10
9
112 p
114 r
105 i
110 n
116 t
32
83 S
84 T
68 D
69 E
82 R
82 R
32
34 "
92 \
110 n
34 "
44 ,
115 s
99 c
97 a
108 l
97 a
114 r
32
108 l
111 o
99 c
97 a
108 l
116 t
105 i
109 m
101 e
44 ,
34 "
92 \
110 n
34 "
59 ;
13
10
125 }
13
10
117 u
115 s
101 e
32
100 d
105 i
97 a
103 g
110 n
111 o
115 s
116 t
105 i
99 c
115 s
59 ;
13
10
112 p
114 r
105 i
110 n
116 t
32
34 "
67 C
111 o
110 n
116 t
101 e
110 n
116 t
45 -
116 t
121 y
112 p
101 e
58 :
116 t
101 e
120 x
116 t
47 /
112 p
108 l
97 a
105 i
110 n
92 \
110 n
92 \
110 n
34 "
59 ;
13
10
112 p
114 r
105 i
110 n
116 t
32
113 q
113 q
123 {
119 w
116 t
102 f
125 }
59 ;
13
10
112 p
114 r
105 i
110 n
116 t
32
60 <
60 <
69 E
110 n
100 d
84 T
101 e
120 x
116 t
59 ;
13
10
119 w
116 t
102 f
13
10
69 E
110 n
100 d
84 T
101 e
120 x
116 t
13
10
D:\httpd\cgi-bin\hasbeans\dev>
I see the CR-LF pair, but should there also be that blank line between
blocks?
--
Amer Neely
w: www.softouch.on.ca/
b: www.softouch.on.ca/blog/
v: 705.223.3539
Perl | MySQL programming for all data entry forms.
"We make web sites work!"
------------------------------
Date: 23 Oct 2006 10:21:50 -0700
From: "gavino" <bootiack@yahoo.com>
Subject: Re: command to substitute x with y, but only x alone
Message-Id: <1161624106.776726.100090@k70g2000cwa.googlegroups.com>
awesome
------------------------------
Date: 23 Oct 2006 09:22:16 -0700
From: "inetquestion" <inetquestion@hotmail.com>
Subject: cpu idle measurement: sar/vmstat
Message-Id: <1161620536.612609.31680@i3g2000cwc.googlegroups.com>
I can't seem to get rid of the error message if sar doesn't exist in
the path. The redirection of stderr from within the backticks isn't
working via perl. Is there another way to allieviate these errors from
showing up in the console? Any suggestions on how to get cpuidle which
will work on unix or windows?
$CpuAvg=`sar -u 15 2>/dev/null | tail -1 | awk '{print \$5}'`;
if ( $CpuAvg=~/[0-9]*/ ) {
$CpuAvg=`vmstat 15 2 | tail -1 | awk '{print \$22}'`;
}
chomp($CpuAvg);
-Inet
------------------------------
Date: Mon, 23 Oct 2006 16:50:04 -0400
From: Adam Lawson <tidusx2@cogeco.ca>
Subject: Error installing Apache::Request
Message-Id: <7W9%g.122044$ED.93166@read2.cgocable.net>
I am recieving the error
mod_perl 1.x ( < 1.99) is required at Makefile.PL line 34.
BEGIN failed--compilation aborted at Makefile.PL line 36.
I've installed mod_perl and it says up to date
I am trying to install using perl -MCPAN -e 'install Apache::Request'
where do i begin to troubleshoot the problem?
thank you
Adam
------------------------------
Date: Mon, 23 Oct 2006 14:44:16 -0700
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: Error installing Apache::Request
Message-Id: <gmpv04x6rb.ln2@goaway.wombat.san-francisco.ca.us>
On 2006-10-23, Adam Lawson <tidusx2@cogeco.ca> wrote:
> I am recieving the error
>
> mod_perl 1.x ( < 1.99) is required at Makefile.PL line 34.
> BEGIN failed--compilation aborted at Makefile.PL line 36.
>
> I've installed mod_perl and it says up to date
>
> I am trying to install using perl -MCPAN -e 'install Apache::Request'
>
> where do i begin to troubleshoot the problem?
Apache::Request is a mod_perl 1.0 module, apparently replaced by
Apache::RequestRec. You'll need to either port your 1.0 code to
mod_perl 2.0's API or roll back to mod_perl 1.0.
--keith
--
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://www.therockgarden.ca/aolsfaq.txt
see X- headers for PGP signature information
------------------------------
Date: Mon, 23 Oct 2006 17:02:16 +0200
From: ismael <ismael.pernas.c@gmail.es>
Subject: File and directory permissions
Message-Id: <ehiler$dq299@cesio.mundo-r.com>
Hi all
I have some problems to get the the permissions on windows with Perl code. I
use a simple code that run perfectly in UNIX but give me wrong information
on Windows. This is the code:
$file = "/home/ismael/pruebaperl/fichero.txt";
print "Starting to analize $file\n";
if (-e $file){
print "found\n";
}
else {
print "not found\n";
}
if (-x $file){
print "executable\n";
}
if (-r $file){
print "readable\n";
}
if (-w $file){
print "writable\n";
}
print "finished\n";
This code allways say that file is readable and writable except if is a read
only file.
is there a solution for this?, one library or code? Anything that i do
wrong?
Thanks everybody.
Best regards.
------------------------------
Date: 23 Oct 2006 09:53:10 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: File and directory permissions
Message-Id: <1161622390.804801.310390@h48g2000cwc.googlegroups.com>
ismael wrote:
> I have some problems to get the the permissions on windows with Perl code. I
> use a simple code that run perfectly in UNIX but give me wrong information
> on Windows. This is the code:
>
> $file = "/home/ismael/pruebaperl/fichero.txt";
> print "Starting to analize $file\n";
> if (-e $file){
> print "found\n";
> }
> else {
> print "not found\n";
> }
> if (-x $file){
> print "executable\n";
> }
> if (-r $file){
> print "readable\n";
> }
> if (-w $file){
> print "writable\n";
> }
> print "finished\n";
>
> This code allways say that file is readable and writable except if is a read
> only file.
> is there a solution for this?
I don't know what the problem to which you're looking for a solution
is. The above file is reported as readable and writeable. Is that not
correct? And you said if it's a read-only file, it's not reported as
readable and writeable? What is it reported as?
> , one library or code? Anything that i do wrong?
Well, primarily what you've done wrong is not told us what the actual
problem is. What results are you *expecting*, and what results do you
see? Be very specific.
Paul Lalli
------------------------------
Date: Mon, 23 Oct 2006 10:25:05 -0500
From: l v <veatchla@yahoo.com>
Subject: Re: FTP to a windows file share?
Message-Id: <12jpnmhqskecl3b@news.supernews.com>
MattJ83 wrote:
>> I just started to read this thread so I'm sorry if this was discussed
>> and I just missed it. I'm guessing that windows server ukbr1234 has a
>> shared directory called 'shared' with a sub-directory called test. This
>> share is physically located on the server, for example, at d:\share\test
>> on ukbr1234. Correct?
>
> \\ukbr1234\share\test is the location yes......so when it is mapped to
> a drive it becomes Y:\test
>> You need to copy some unix files to \\ukbr1234\share\text. Correct?
>>
>
> yes. Im logged onto the unix server through hummingbird and want the
> files to copy to a windows server.
>
>> Is ftp installed on the windows server?
> not sure
>
>> If not, can ftp be installed on this server?
> not sure
>
> ^^^^^^^^^ the server is a storage server and doesn't allow anyone to
> login remotely. You have to be at the machine (which I don't have
> access to) so apart from not being able to easily find out - I think
> the installing of items would be hard!
It's easy to find out, from the unix server or your pc (not exceed), try
to ftp to the windows server from the command line. If it prompts for
login, then ftp is running. Remote desktop is not needed to determine
if ftp is installed and running, however, it is needed to determine if
it is installed and not running.
Sounds like you have a valid business case for the windows server owner
to install ftp.
>> If ftp is or can be installed, then you can create an virtual ftp
>> directory pointing to d:\share\test. The unix server can then ftp to
>> the windows server just like you ftp to a unix server using Net::FTP.
>> The windows share \\ukbr1234\share\test will contain the unix files when
>> accessing from your desktop. Is this what you are looking for?
>>
>
> this is spot on what i am looking for.......
> i was orignally looking at mapping to a windows share in perl and then
> transfering files across that way thats why i was looking at
> Win32::NetResource:
> http://www.codecomments.com/archive210-2004-3-154919.html
I'm not aware of being able to map a windows share within native unix.
I believe that is a windows to windows thing. But I could be wrong.
You need something to mount a windows share into your unix file system.
Someone mentioned Samba can do this. I do not know how Samba works,
but if you need to install it on your windows server, ftp would be
easier choice IMO.
--
Len
------------------------------
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 9881
***************************************
