[24740] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 6895 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Aug 20 21:05:57 2004

Date: Fri, 20 Aug 2004 18:05:05 -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           Fri, 20 Aug 2004     Volume: 10 Number: 6895

Today's topics:
    Re: Any YahooPop/fetchyahoo Like For NNTP on Google? <postmaster@castleamber.com>
    Re: Any YahooPop/fetchyahoo Like For NNTP on Google? <noreply@gunnar.cc>
    Re: Any YahooPop/fetchyahoo Like For NNTP on Google? <postmaster@castleamber.com>
    Re: Can I modify scalars contained in the array ref ret <postmaster@castleamber.com>
    Re: How to upload a file from a local pc to  a web serv <tadmc@augustmail.com>
        Javascript, ODBC, and Oracle functions returning cursor (Roger Redford)
    Re: Javascript, ODBC, and Oracle functions returning cu <anacedent@hotmail.com>
    Re: Javascript, ODBC, and Oracle functions returning cu <nospam@bigpond.com>
    Re: Problems installing DBI module on perl <patricksoltani@sbcglobal.net>
        start some actions with Perl without Cron? <gp@nospm.hr>
    Re: start some actions with Perl without Cron? <noreply@gunnar.cc>
    Re: trim code for mimic ls -tr <noemail@#$&&!.net>
    Re: what's the best environment to exercise Perl? <tadmc@augustmail.com>
    Re: what's the best environment to exercise Perl? <postmaster@castleamber.com>
    Re: what's the best environment to exercise Perl? <postmaster@castleamber.com>
    Re: what's the best environment to exercise Perl? <postmaster@castleamber.com>
    Re: what's the best environment to exercise Perl? <postmaster@castleamber.com>
        Why '' Is Matched First Time, Not Second Time <SaveWorldFromAids@alexa.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 20 Aug 2004 23:42:56 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Any YahooPop/fetchyahoo Like For NNTP on Google?
Message-Id: <Xns954BBE628B32castleamber@130.133.1.4>

Toby Inkster <usenet200408@tobyinkster.co.uk> wrote in
news:pan.2004.08.20.06.06.03.885372@tobyinkster.co.uk: 

> http://links.i6networks.com wrote:
> 
>> The normal one is NOT FREE. Very few ISP provides free NNTP, and it
>> has many restrictions. Juno, Netscape, NetZero, People's PC don't
>> have NNTP. 
> 
> Every ISP I've ever used has had at least one NNTP server.

So you haven't used Megacable :-D. In quite some countries Usenet is less 
know / used, and so the providers don't bother.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: Sat, 21 Aug 2004 01:45:01 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Any YahooPop/fetchyahoo Like For NNTP on Google?
Message-Id: <2onh5kFcoa8eU1@uni-berlin.de>

Full-quoting and unjustified cross-posting are pretty annoying as well.

Arne wrote:
> A: Because it messes up the order in which people normally read text.
> 
> Q: Why is top-posting such a bad thing?
> 
> A: Top-posting.
> 
> Q: What is the most annoying thing on usenet?

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: 20 Aug 2004 23:54:25 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Any YahooPop/fetchyahoo Like For NNTP on Google?
Message-Id: <Xns954BC05199AC9castleamber@130.133.1.4>

"Bill Clark" <curmudgeon@senilityis.us> wrote in
news:642VpEtJItBf-pn2-wWh5itIdclQk@04-154.158.popsite.net: 

> Dmitri wrote:
> 
>> $5 one time fee at teranews.net  for account setup would be as close
>> as it gets to being free for a normal NNTP server.
> 
> Careful with this one as they use their own message id system which
> can screw up threading in some news readers...

I see it's 3.95 for 50 MB / day, one time set up fee.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: 20 Aug 2004 23:41:30 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: Can I modify scalars contained in the array ref returned by DBI
Message-Id: <Xns954BBE2495B07castleamber@130.133.1.4>

anodide@hotmail.com (Aaron Anodide) wrote in 
news:2db1147f.0408200453.a65a562@posting.google.com:

>> Also the > doesn't need to be escaped in many cases.
>> <something> a > b </something> is valid.
> 
> That's interesting, I didn't know it.  I wonder if it's worth the
> effort to analyze the context of the >'s though...
 
I import (Perl) code into XML, and only escape the < and &. There probably 
is a module which has a nice escape function for this. (And I guess it 
escapes the > too).

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: Fri, 20 Aug 2004 17:15:34 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: How to upload a file from a local pc to  a web server from a   html page????
Message-Id: <slrncicu06.2jg.tadmc@magna.augustmail.com>

Brian McCauley <nobull@mail.com> wrote:
> Alan J. Flavell wrote:
> 
>> A feel the need to correct myself on one point:
> 
> On the contrary, there's no need to correct yourself.  On Usenet there 
> are thousands of people just waiting to leap at the chance to correct 
> you. :-)


I think that you are wrong there.


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 20 Aug 2004 16:32:37 -0700
From: dba_222@yahoo.com (Roger Redford)
Subject: Javascript, ODBC, and Oracle functions returning cursors
Message-Id: <a8c29269.0408201532.76f8cab1@posting.google.com>

Dear Experts,

I'm attempting to marry a system to an Oracle 817 datbase.
Oracle is my specialty, the back end mainly, so I don't
know much about java or javascript.

The system uses javascript to make ODBC calls to the db. 

The particular system I'm working with, will not work
with an Oracle stored procedure I'm told.  However, it 
will work with a stored function.

I made a simple function in Oracle to return a single 
integer.  It works in sqlplus, but not via javascript.


-----------------------

Create or replace function  fnc_rtn_integer
Return   integer 
As
Ln_temp	integer := 0;
Begin
  Select count(*)
  Into ln_temp
  From dual;
Return LN_TEMP;

End;


-----------------------
Sqlplus:

declare
   ln_temp integer := -1;
begin
   ln_temp :=  fnc_rtn_integer;
   dbms_output.put_line (ln_temp);
end;

1


-----------------------
javascript:


ESC.tb.pop_addr=1;{call fnc_rtn_integer}

Netscape Privledge Manager exception
netscape.security.ForbiddenTargetException: access to target denied
davox.host.AnswerSoftDB:Using local character set: 0 : 
davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
no descriptor for this position

davox.host.AnswerSoftDB:-2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position

davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position

-----------------------
2)

The developers need to get a number of rows back.
I've made an Oracle function, that will return a 
number of rows. 

----------------------

CREATE OR REPLACE FUNCTION fnc_rtn_emp_info
RETURN types.ref_cursor
AS
emp_cursor types.ref_cursor;

BEGIN

OPEN emp_cursor FOR 
SELECT 	empno,
	ENAME,
	JOB
From 	EMP;

RETURN emp_cursor;

END;


CREATE OR REPLACE function fnc_dept_rpt
Return types.DeptCurTyp 
AS

dept_cv 	types.DeptCurTyp ;

BEGIN
    OPEN dept_cv FOR 
	SELECT DEPTNO,
		DNAME,
		LOC 
	FROM DEPT;

	Return dept_cv;
END;

----------------

ESC.tb.pop_addr=1;{call FNC_DEPT_RPT()}

Netscape Privledge Manager exception
netscape.security.ForbiddenTargetException: access to target denied
davox.host.AnswerSoftDB:Using local character set: 0 : 
davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
no descriptor for this position

davox.host.AnswerSoftDB:-2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position

davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position

-----------------------

ESC.tb.pop_addr=1;{call FNC_DEPT_RPT()  AND ESC.tb.pop_addr=1;{call
FNC_DEPT_RPT

davox.host.AnswerSoftDB:Using local character set: 0 : 
davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-00911:
invalid character

davox.host.AnswerSoftDB:-2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-00911: invalid character

davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-00911: invalid character

-----------------------

ESC.tb.pop_addr=1;{call FNC_DEPT_RPT}

Netscape Privledge Manager exception
netscape.security.ForbiddenTargetException: access to target denied
davox.host.AnswerSoftDB:Using local character set: 0 : 
davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
no descriptor for this position

davox.host.AnswerSoftDB:-2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position

davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
[Oracle][ODBC][Ora]ORA-24334: no descriptor for this position


-----------------------

A few questions.

1)
I'm sure that this could be just a syntax issue.  
Any ideas?  Please send the exact sytax that it should be. 


2)
Does anyone have experience getting a number of rows back 
with an Oracle cursor?  Is this possible?  Am I doing it
in the right way? 


Thanks a lot!


------------------------------

Date: Fri, 20 Aug 2004 23:52:34 GMT
From: "Ana C. Dent" <anacedent@hotmail.com>
Subject: Re: Javascript, ODBC, and Oracle functions returning cursors
Message-Id: <Xns954BABACB17A4SunnySD@68.6.19.6>

dba_222@yahoo.com (Roger Redford) wrote in 
news:a8c29269.0408201532.76f8cab1@posting.google.com:

> Dear Experts,
> 
> I'm attempting to marry a system to an Oracle 817 datbase.
> Oracle is my specialty, the back end mainly, so I don't
> know much about java or javascript.
> 
> The system uses javascript to make ODBC calls to the db. 
> 
> The particular system I'm working with, will not work
> with an Oracle stored procedure I'm told.  However, it 
> will work with a stored function.
> 
> I made a simple function in Oracle to return a single 
> integer.  It works in sqlplus, but not via javascript.
> 
> 
> -----------------------
> 
> Create or replace function  fnc_rtn_integer
> Return   integer 
> As
> Ln_temp     integer := 0;
> Begin
>   Select count(*)
>   Into ln_temp
>   From dual;
> Return LN_TEMP;
> 
> End;
> 
> 
> -----------------------
> Sqlplus:
> 
> declare
>    ln_temp integer := -1;
> begin
>    ln_temp :=  fnc_rtn_integer;
>    dbms_output.put_line (ln_temp);
> end;
> 
> 1
> 
> 
> -----------------------
> javascript:
> 
> 
> ESC.tb.pop_addr=1;{call fnc_rtn_integer}
> 
> Netscape Privledge Manager exception
> netscape.security.ForbiddenTargetException: access to target denied
> davox.host.AnswerSoftDB:Using local character set: 0 : 
> davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
> no descriptor for this position
> 
> davox.host.AnswerSoftDB:-2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> -----------------------
> 2)
> 
> The developers need to get a number of rows back.
> I've made an Oracle function, that will return a 
> number of rows. 
> 
> ----------------------
> 
> CREATE OR REPLACE FUNCTION fnc_rtn_emp_info
> RETURN types.ref_cursor
> AS
> emp_cursor types.ref_cursor;
> 
> BEGIN
> 
> OPEN emp_cursor FOR 
> SELECT      empno,
>      ENAME,
>      JOB
> From      EMP;
> 
> RETURN emp_cursor;
> 
> END;
> 
> 
> CREATE OR REPLACE function fnc_dept_rpt
> Return types.DeptCurTyp 
> AS
> 
> dept_cv      types.DeptCurTyp ;
> 
> BEGIN
>     OPEN dept_cv FOR 
>      SELECT DEPTNO,
>           DNAME,
>           LOC 
>      FROM DEPT;
> 
>      Return dept_cv;
> END;
> 
> ----------------
> 
> ESC.tb.pop_addr=1;{call FNC_DEPT_RPT()}
> 
> Netscape Privledge Manager exception
> netscape.security.ForbiddenTargetException: access to target denied
> davox.host.AnswerSoftDB:Using local character set: 0 : 
> davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
> no descriptor for this position
> 
> davox.host.AnswerSoftDB:-2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> -----------------------
> 
> ESC.tb.pop_addr=1;{call FNC_DEPT_RPT()  AND ESC.tb.pop_addr=1;{call
> FNC_DEPT_RPT
> 
> davox.host.AnswerSoftDB:Using local character set: 0 : 
> davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-00911:
> invalid character
> 
> davox.host.AnswerSoftDB:-2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-00911: invalid character
> 
> davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-00911: invalid character
> 
> -----------------------
> 
> ESC.tb.pop_addr=1;{call FNC_DEPT_RPT}
> 
> Netscape Privledge Manager exception
> netscape.security.ForbiddenTargetException: access to target denied
> davox.host.AnswerSoftDB:Using local character set: 0 : 
> davox.host.AnswerSoftDB:? [State: S1000] [Oracle][ODBC][Ora]ORA-24334:
> no descriptor for this position
> 
> davox.host.AnswerSoftDB:-2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> davox.host.HostConn:get ESC.tb.pop_addr Host -2 ? [State: S1000]
> [Oracle][ODBC][Ora]ORA-24334: no descriptor for this position
> 
> 
> -----------------------
> 
> A few questions.
> 
> 1)
> I'm sure that this could be just a syntax issue.  
> Any ideas?  Please send the exact sytax that it should be. 
> 
> 
> 2)
> Does anyone have experience getting a number of rows back 
> with an Oracle cursor?  Is this possible?  Am I doing it
> in the right way? 
> 
> 
> Thanks a lot!
> 

Why in the world are you spamming every language newgroup under the SUN?
comp.databases.oracle.server,comp.lang.javascript,comp.lang.java.api,comp.l
ang.basic.visual.database,comp.lang.perl.misc

Either your ODBC or JS code is FUBAR. PL/SQL does know know or care
about the language of the code which calls it. PL/SQL is too dumb to know
or care about the calling language.




--****************************Start PL/SQL****************************

CREATE OR REPLACE PACKAGE Calc AS

Function Add5 (num in number) RETURN NUMBER;

END Calc;

/

CREATE OR REPLACE PACKAGE BODY Calc AS

Function Add5 (num in number) RETURN NUMBER IS

Begin

Return (num + 5);

End Add5;

END Calc;

/

--****************************End PL/SQL****************************

'****************************Start VB Code****************************

Dim con As New ADODB.Connection

Dim cmd As New ADODB.Command

Dim InputParam As New ADODB.Parameter

Dim ReturnParam As New ADODB.Parameter

con.ConnectionString = "DSN=ODBC8; UID=scott; PWD=tiger;"

con.Open

cmd.ActiveConnection = con

cmd.CommandText = "Calc.Add5"

cmd.CommandType = adCmdStoredProc

Set InputParam = cmd.CreateParameter("Prm1", adSmallInt, adParamInput, , 
30)

'Using adParamOutPut instead of adParamReturnValue will result in the 
following error:

'ORA-24334 - no descriptor for this position

'Set Prm2 = cmd.CreateParameter("Prm2", adSmallInt, adParamOutput)

Set ReturnParam = cmd.CreateParameter("Prm2", adSmallInt, 
adParamReturnValue)

'You will also get the ORA-24334 error if you don't Append the parameters

'in the correct order. Make sure to bind the Returning parameter first.

cmd.Parameters.Append ReturnParam

cmd.Parameters.Append InputParam

cmd.Execute

MsgBox "Input Value = " & cmd.Parameters(1)

MsgBox "Return Value = " & cmd.Parameters(0)

'****************************End VB Code****************************



------------------------------

Date: Sat, 21 Aug 2004 10:49:49 +1000
From: Gregory Toomey <nospam@bigpond.com>
Subject: Re: Javascript, ODBC, and Oracle functions returning cursors
Message-Id: <2onkhdFcbi2tU1@uni-berlin.de>

Roger Redford wrote:

> Oracle is my specialty, the back end mainly,
 ...
> 2)
> Does anyone have experience getting a number of rows back
> with an Oracle cursor?  Is this possible? 

For somebody who specialises in Oracle, but does not know about getting rows
from a cursor, your come across as a prize idiot.

Please dont bother us in comp.lang.perl.misc.

gtoomey


------------------------------

Date: Sat, 21 Aug 2004 00:34:53 GMT
From: patrick <patricksoltani@sbcglobal.net>
Subject: Re: Problems installing DBI module on perl
Message-Id: <41269981.5000608@sbcglobal.net>

Pablo-UAM wrote:
> Hi!
> I'm trying to install the DBI-1.13 module on perl 5.005_03. I first
> execute
> 
> # perl Makefile.PL
> 
> And it works alright, but when i execute the 'make' command i get this
> error message:
> cc -c   -xO3 -xdepend     -DVERSION=\"1.13\"  -DXS_VERSION=\"1.13\" -KPIC
> -I/usr/perl5/5.00503/sun4-solaris/CORE -DDBI_NO_THREADS Perl.c
> /usr/ucb/cc:  language optional software package not installed
> *** Error code 1
> make: Fatal error: Command failed for target `Perl.o'
> 
If I remember correctly, the cc in Solaris is not a compiler, but a 
script.  If you need a compiler either you have to install the Forte or 
gcc.

There are pre-built packages that you can install, do your perl thing 
and remove it if you don't want to keep a compiler on the production 
server: http://www.blastwave.org/

If you use gcc just remove the /usr/ucb/cc from the path and that should 
take care of this.

Regards,
Patrick Soltani.



------------------------------

Date: Sat, 21 Aug 2004 00:33:13 +0200
From: "PHP2" <gp@nospm.hr>
Subject: start some actions with Perl without Cron?
Message-Id: <cg5u56$d6$1@ls219.htnet.hr>

is possible start some actions with Perl without Cron?

for example send email to users from database after 3 days or delete
something from database automaticaly after 3 day with Perl but without Cron?




------------------------------

Date: Sat, 21 Aug 2004 00:51:26 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: start some actions with Perl without Cron?
Message-Id: <4126806E.8010106@gunnar.cc>

PHP2 wrote:
> is possible start some actions with Perl without Cron?

Do not multi-post!

     http://www.uwasa.fi/~ts/http/crospost.html

-- 
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl


------------------------------

Date: Fri, 20 Aug 2004 17:20:05 -0500
From: Fred <noemail@#$&&!.net>
Subject: Re: trim code for mimic ls -tr
Message-Id: <pan.2004.08.20.22.20.02.993446@#$&&!.net>

On Fri, 20 Aug 2004 07:52:52 +0000, Anno Siegel wrote:

> Fred  <noemail@#$&&!.net> wrote in comp.lang.perl.misc:
>> On Thu, 19 Aug 2004 08:30:53 +0000, Anno Siegel wrote:
>> 
>> > Fred  <noemail@#$&&!.net> wrote in comp.lang.perl.misc:
>> >> I was wanting to de-bloat this code. The objective was to mimic the ls
>> >> –tr UNIX command and store those files, sorted by time, into a
>> >> list. I found bits and pieces of code here, and added my own, and the
>> >> result given below does work, but I’m afraid it’s very
>> >> inefficient.
>> > 
>> > It looks to me that all you want is the youngest file (of a certain
>> > type) in a directory.  That can be done in a linear pass over the files
>> > without sorting.
>> > 
>> >> #!/usr/local/bin/perl -w
>> >> use strict;
>> >> use warnings;
>> >> my($dir) = $ARGV[0] ? $ARGV[0] : '.'; opendir(DIR, $dir) or die("Cannot
>> >> open directory '$dir': $!");
>> > 
>> > From this point, continue like this:
>> > 
>> >     my ( $youngest, @files) = grep /LOG/, grep !/^\.\.?$/, readdir( DIR)
>> >     or
>> >         die "No LOG files in $dir";
>> >     -M $youngest < -M $_ or $youngest = $_ for @files; print "The
>> >     youngest LOG file in $dir is: $youngest\n";
>> > 
>> > Anno
>> 
>> I was hoping it could be done in linear fashion, nested foreach loops
>> are nasty, I
>> know. My issue with your generous response to my post is this line:
>>  -M $youngest < -M $_ or $youngest = $_ for @files;
>> gives me an error of (don't quote me we don't have nntp at work,
>>  I am working out of poor
>> memory. ie; non ecc human memory) 'uninitialized variable' on that line.
> 
> "Uninitialized value..." is not an error but a warning.  The program
> would continue.
> 
> However, I don't see how that could happen.  readdir() doesn't return
> undefined values.  If no files of the specified kind are found, the
> program will die in the line before.
> 
>> However ignoring that allow me to implore you to expound on that line of
>> code. The entire line had me baffled to some degree.
> 
> "-M $file" is the age of the file in days (perldoc -f -X).  So
> "-M $youngest < -M $_" checks whether the file $youngest is indeed
> younger than the file in $_.  If it is, the "or" part in
> "-M $youngest < -M $_ or $youngest = $_" is ignored, but if it isn't,
> $youngest is now set to the younger file in $_.  The complete statement
> "-M $youngest < -M $_ or $youngest = $_ for @files" sets $_ to each
> filename in @files in turn and performs the above process.  So in the
> end, $youngest must contain the youngest file of the lot.
> 
> Anno

Thank you for the explanation, I have to get perldoc for my Linux home
computer!



------------------------------

Date: Fri, 20 Aug 2004 17:11:54 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: what's the best environment to exercise Perl?
Message-Id: <slrncictpa.2jg.tadmc@magna.augustmail.com>

David K. Wall <dwall@fastmail.fm> wrote:
> Tad McClellan <tadmc@augustmail.com> wrote in message
><news:slrncibt66.1ui.tadmc@magna.augustmail.com>: 

>> Look it up in "The Jargon File":

> Damn, I just lost 15-30 minutes browsing around the new entries


See:

   http://www.catb.org/~esr/jargon/html/T/time-sink.html


heh.

-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


------------------------------

Date: 20 Aug 2004 23:30:00 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: what's the best environment to exercise Perl?
Message-Id: <Xns954BBC3043177castleamber@130.133.1.4>

Alont <end@dream.life> wrote in news:413aa807.180113656@130.133.1.4:

> I'm sorry, My date and time is real.

Top posting means that you reply in the wrong place. Fix it.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: 20 Aug 2004 23:32:07 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: what's the best environment to exercise Perl?
Message-Id: <Xns954BBC8A8B5DCcastleamber@130.133.1.4>

Alont <end@dream.life> wrote in news:413eadeb.181621218@130.133.1.4:

> could you help me how to set cursor automatically stay below quoting?

It should start on top. Why? Because you can do the second good thing in 
replying, namely removing lines (snipping) you *don't* reply to.

> I use Agent, this software's default setting is that cursor
> automatically stay on the top of quoting.

Good thinking.

> I asked a man who knows the history of Usenet, He said that reply in
> top or bottom is not a rule people must obey, that just a custom of
> NNTP client,

So much for his history knowledge.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: 20 Aug 2004 23:35:44 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: what's the best environment to exercise Perl?
Message-Id: <Xns954BBD26A6C5castleamber@130.133.1.4>

Villy Kruse <vek@station02.ohout.pharmapartners.nl> wrote in
news:slrncibjkq.q2.vek@station02.ohout.pharmapartners.nl: 

> Which might result in a full quote, which isn't always appropriate
> either. The old rule was: at most half of the total post may be quoted
> material, and some news program did enforce that.

With 60% my client gives a warning. Sometimes it's not a problem, but with 
a posting consisting of 500 lines, quoting 50% (or 100%) when you just say 
aol, is a bit of a waste :-(

> If the full quote
> is only half a page that wouldn't be a problem; several pages of quote
> before a few line of new contribution isn't friendly to the reader.

Agreed. With very long postings or emails I always reread and try to remove 
every line that can be missed, and my replies still be understood. Most of 
the time I am able to keep the quote to two or three lines.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: 20 Aug 2004 23:37:00 GMT
From: John Bokma <postmaster@castleamber.com>
Subject: Re: what's the best environment to exercise Perl?
Message-Id: <Xns954BBD5B7A8E8castleamber@130.133.1.4>

Abhinav <matrix_calling@yahoo.dot.com> wrote in
news:0FkVc.30$CL3.97@news.oracle.com: 

> proper posting. There is no news program (yet) which would take you to
> the place where you *want* to start replying, keeping only the
> required portion of the post in context and snipping the rest of it :)

If you select text in the preview pane of Xnews, and hit reply, it does 
that :-D. But it can't mind read (yet) :-D.

-- 
John                               MexIT: http://johnbokma.com/mexit/
                           personal page:       http://johnbokma.com/
        Experienced programmer available:     http://castleamber.com/
            Happy Customers: http://castleamber.com/testimonials.html


------------------------------

Date: Sat, 21 Aug 2004 00:34:00 GMT
From: "http://links.i6networks.com" <SaveWorldFromAids@alexa.com>
Subject: Why '' Is Matched First Time, Not Second Time
Message-Id: <YLwVc.1833114$Ar.1019409@twister01.bloor.is.net.cable.rogers.com>

##################Perl File
    my @line=(); my $foundcat=0;
    my $keyword1=''; my $keywordcat='';
    open ($INPUT, 'ostkall.txt')         || die "can't open $file: $!";
    while (<$INPUT>) {
        chomp;
        if (!($_=~ m/.+\|.+\|.+/)) {
  if
   ($_=~ m/$keywordcat/i)
  {
   $foundcat=1;
   print "FOUND $_\n";

  } else {$foundcat=0;}
 } #end of  if (!($_=~ m/.+\|.+\|.+/)

    }
    close($INPUT)  ;

#####################The output is
FOUND Computers & Printers|Monitors

But it should be
FOUND Computers & Printers|Monitors
FOUND Computers & Printers|Priners


#################the data in ostkall.txt is
Computers & Printers|Monitors
 | | | | |
Computers & Printers|Printers
 | | | | |

############# Question
Empty String '' is matched the first time but not the second time. Why?




------------------------------

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 6895
***************************************


home help back first fref pref prev next nref lref last post