[23306] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 5526 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Sep 19 03:05:47 2003

Date: Fri, 19 Sep 2003 00: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           Fri, 19 Sep 2003     Volume: 10 Number: 5526

Today's topics:
        Conditionnal occurence modification <shemond@hotmail.com>
    Re: create new file <cjh2011@columbia.edu>
    Re: create new file (ko)
        How can I comment out a large block of perl code? <jidanni@jidanni.org>
        Little survey for Unix users <shemond@hotmail.com>
    Re: Little survey for Unix users (Tad McClellan)
    Re: Little survey for Unix users <dha@panix.com>
    Re: Little survey for Unix users <abigail@abigail.nl>
        Modify a text file directly <shemond@hotmail.com>
    Re: Modify a text file directly <mgjv@tradingpost.com.au>
    Re: Modify a text file directly <bwalton@rochester.rr.com>
    Re: Order of evaluation of expressions (David Combs)
    Re: perl lib all over the place (Tad McClellan)
        Perl program need in regular expression (Benson)
    Re: Perl program need in regular expression <laocoon@fastmail.fm>
    Re: Perl program need in regular expression (Tad McClellan)
    Re: referencing, closures, classes <REMOVEsdnCAPS@comcast.net>
    Re: Splitting up an XML File (trwww)
    Re: wtf is the deal? <tom@nosleep.net>
    Re: wtf is the deal? <uri@stemsystems.com>
    Re: wtf is the deal? (Tad McClellan)
    Re: wtf is the deal? <dha@panix.com>
    Re:  <bwalton@rochester.rr.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: Thu, 18 Sep 2003 18:43:00 -0400
From: Steve =?ISO-8859-1?Q?H=E9mond?= <shemond@hotmail.com>
Subject: Conditionnal occurence modification
Message-Id: <42uab.7867$BT1.384914@news20.bellglobal.com>

Hi,

I post something about that issue earlier : I want to modify a text-file
that looks like this : (assume that * are random characters)

PS1****PW0.50****PW1****PW2.5***PS4*****PW5.5***PS1***PW4.2***PW2.0***

 ..and so on.

For each PSx I have to set the PWx's to the same value :

PS1 = PW5.0
PS2 = PW10.0
PS3 = PW15.0

I have to scan the file using this logic :

1. Scan the file until a PSx is found.
2. Scan until the next PWx and replace it to the PSx's correct value.
3. Continue scanning and replacing all PWx's until the next PSx is found.

Actually I can replace the PWx's between the PSx only if there is an even
number of PWx between the PSx.

Any ideas?

Thanks in advance,

Steve


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

Date: Thu, 18 Sep 2003 22:22:17 -0400
From: Cody Hess <cjh2011@columbia.edu>
Subject: Re: create new file
Message-Id: <bkdp8p$mco$1@newsmaster.cc.columbia.edu>

Bob Walton wrote:
> Cody Hess wrote:
> 
>> I want my script to create new files when opening a filehandle to a 
>> file that doesn't exist.
>>
>> open FILE, "> new_file.dat" or die "Failed: $!";
>>
>> I believe this should happen automatically, but I get the error
>>
>> Failed: No such file or directory at ./write_file_experiment.pl line 3.
>>
>> Is there something wrong with my filehandle?  Is there another way to 
>> create a new file if it doesn't already exist?
>>
> 
> Your code, run verbatim, works fine on my system (Windoze 98SE, AS Perl 
> build 806).  You don't say what your OS and Perl versions are -- would 
> you happen to be in a directory where the user you are running doesn't 
> have directory write (or maybe read) priviledge (and on an OS where that 
> is possible)?
> 
I run perl 5.8 on Mac OS X (10.1).  The directory is writable to the 
owner.  I've tried running the script as root and I get the same error 
message.



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

Date: 18 Sep 2003 19:53:56 -0700
From: kuujinbo@hotmail.com (ko)
Subject: Re: create new file
Message-Id: <92d64088.0309181853.7699b524@posting.google.com>

Cody Hess <cjh2011@columbia.edu> wrote in message news:<bkdca1$cg7$1@newsmaster.cc.columbia.edu>...
> I want my script to create new files when opening a filehandle to a file 
> that doesn't exist.
> 
> open FILE, "> new_file.dat" or die "Failed: $!";
> 
> I believe this should happen automatically, but I get the error
> 
> Failed: No such file or directory at ./write_file_experiment.pl line 3.
> 

Works ok for me...

> Is there something wrong with my filehandle?  Is there another way to 
> create a new file if it doesn't already exist?

You can always use sysopen():

sysopen(FH, $path, O_WRONLY | O_EXCL | O_CREAT) or die $!;

make sure you inlude 'use Fcntl;'. This will do what you asked - open
a file for writing, creating a new file which must not previously
exist. For details, 'perldoc perlopentut'.

HTH - keith


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

Date: Fri, 19 Sep 2003 12:04:48 +0800
From: Dan Jacobson <jidanni@jidanni.org>
Subject: How can I comment out a large block of perl code?
Message-Id: <87y8wljue7.fsf@jidanni.org>

$ perldoc -q 'How can I comment out a large block of perl code?' says
to use =begin comment text, =end comment text, but I find the =end
comment text does not stop the comment, printing only "1":
print 1;

=begin comment text

all of this stuff

here will be ignored
by everyone

=end comment text

print 2;

Wait, he meant to say use a =cut instead of =end comment text!

Please report a bug for me, my bugs just go into a black hole.


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

Date: Thu, 18 Sep 2003 19:05:16 -0400
From: Steve =?ISO-8859-1?Q?H=E9mond?= <shemond@hotmail.com>
Subject: Little survey for Unix users
Message-Id: <_muab.9341$hF3.1237617@news20.bellglobal.com>

I'm not willing to start a religious war, but, what is your prefered editor
for works such as Perl programming? (Vi(m) or Emacs?)




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

Date: Fri, 19 Sep 2003 00:54:58 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Little survey for Unix users
Message-Id: <slrnbml6hi.efm.tadmc@magna.augustmail.com>

Steve Hémond <shemond@hotmail.com> wrote:

> what is your prefered editor
> for works such as Perl programming? (Vi(m) or Emacs?)


Yes.


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


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

Date: Fri, 19 Sep 2003 06:25:43 +0000 (UTC)
From: "David H. Adler" <dha@panix.com>
Subject: Re: Little survey for Unix users
Message-Id: <slrnbml8b7.j3k.dha@panix2.panix.com>

In article <slrnbml6hi.efm.tadmc@magna.augustmail.com>, Tad McClellan wrote:
> Steve Hémond <shemond@hotmail.com> wrote:
> 
>> what is your prefered editor
>> for works such as Perl programming? (Vi(m) or Emacs?)
> 
> 
> Yes.

First of all, I'm with Tad on this one.

Secondly, this isn't on topic.

Let's not start yet another huge thread on preferred editors, ok?

Thanks

dha

-- 
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
Although, of course, it will be $ME in line with the usual practice of
SHOUTING OUT MAGIC VARIABLES.       - Damian Conway


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

Date: 19 Sep 2003 07:01:31 GMT
From: Abigail <abigail@abigail.nl>
Subject: Re: Little survey for Unix users
Message-Id: <slrnbmlaea.esh.abigail@alexandra.abigail.nl>

Steve Hémond (shemond@hotmail.com) wrote on MMMDCLXX September MCMXCIII
in <URL:news:_muab.9341$hF3.1237617@news20.bellglobal.com>:
--  I'm not willing to start a religious war, but, what is your prefered editor
--  for works such as Perl programming? (Vi(m) or Emacs?)


Real (wo)men use 'cat'. Wussies use 'ed'. Vi and Emacs are for poofs.



Abigail
-- 
perl -wle 'print prototype sub "Just another Perl Hacker" {};'


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

Date: Thu, 18 Sep 2003 16:58:23 -0400
From: Steve =?ISO-8859-1?Q?H=E9mond?= <shemond@hotmail.com>
Subject: Modify a text file directly
Message-Id: <%vsab.9017$hF3.1187723@news20.bellglobal.com>

Hi all,

I have to replace some chuncks out of a text file. My actual way to do this
is to put the file contents into a scalar variable :

open (INPUT, "$ARGV[0]") or die ("Can't open file : $!\n");
$in = <INPUT>;
close INPUT;

Then I do my modifications to the file and I (must) write the replacements
into another file :

open  (OUTPUT, ">$ARGV[1]") or die ("Can't create file : $!\n");
seek  (OUTPUT,0,0);
print (OUTPUT $in);
close  OUTPUT;

That way, I must save the replacements to ANOTHER file, which I don't want.
I would like to modify the file DIRECTLY. Since I cannot modify the file
using the file handle like this :

<INPUT> = s/blahblah/blah2blah2/g

How could I modify the file directly?

Thanks in advance,

Steve


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

Date: 19 Sep 2003 01:21:35 GMT
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: Modify a text file directly
Message-Id: <slrnbmkmh1.1m6.mgjv@verbruggen.comdyn.com.au>

On Thu, 18 Sep 2003 16:58:23 -0400,
	Steve Hémond <shemond@hotmail.com> wrote:
> Hi all,
> 
> I have to replace some chuncks out of a text file. My actual way to do this
> is to put the file contents into a scalar variable :

See the Perl FAQ, Section 5, question 

"How do I change one line in a file/delete a line in a file/insert a
line in the middle of a file/append to the beginning of a file?"

Martien
-- 
                        | 
Martien Verbruggen      | This matter is best disposed of from a great
Trading Post Australia  | height, over water.
                        | 


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

Date: Fri, 19 Sep 2003 03:09:00 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: Modify a text file directly
Message-Id: <3F6A7342.9010709@rochester.rr.com>

Steve Hémond wrote:

 ...


> I have to replace some chuncks out of a text file. My actual way to do this
> is to put the file contents into a scalar variable :
> 
> open (INPUT, "$ARGV[0]") or die ("Can't open file : $!\n");
> $in = <INPUT>;
> close INPUT;
> 
> Then I do my modifications to the file and I (must) write the replacements
> into another file :
> 
> open  (OUTPUT, ">$ARGV[1]") or die ("Can't create file : $!\n");
> seek  (OUTPUT,0,0);
> print (OUTPUT $in);
> close  OUTPUT;
> 
> That way, I must save the replacements to ANOTHER file, which I don't want.
> I would like to modify the file DIRECTLY. Since I cannot modify the file
> using the file handle like this :
> 
> <INPUT> = s/blahblah/blah2blah2/g
> 
> How could I modify the file directly?


Couple of things you should check out:

1.  The -i switch on the perl command.  See perldoc perlrun for details. 
  Also check out the -p and -n switches while you're at it.  Something 
on the order of

   perl -i.bak -pe "s/blahblah/blah2blah2/g" filename.ext

might suffice.  Of course, behind the scenes, something similar to what 
you wrote is happening (although the file isn't being slurped) -- this 
is just a very convenient shorthand for folks with the virtue of laziness.

2.  The Tie::File module will let you tie a file to an array, with one 
line per array element.  You may modify the array elements, which will 
cause the file to be modified.  Again, behind the scenes, this is still 
actually doing something somewhat similar to what you were originally 
doing -- there is no other way to accomplish it, unless you happen to be 
replacing stuff character-for-character (in which case check out seek 
and tell).


 ...


> Steve

-- 
Bob Walton



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

Date: Fri, 19 Sep 2003 03:36:57 +0000 (UTC)
From: dkcombs@panix.com (David Combs)
Subject: Re: Order of evaluation of expressions
Message-Id: <bkdtkp$2j8$1@reader2.panix.com>

In article <Xns93EEEC3E82233sdn.comcast@206.127.4.25>,
Eric J. Roode <REMOVEsdnCAPS@comcast.net> wrote:
 ...


What I believe to be true is that when dealing
with *reals*, addition doesn't necessarily
commute, ie a + b doesn't necessairly equal b + a,
because of the limited precision of reals.

So, suppose you want to sum a bunch of reals, maybe 10% of them
"big", and 90% tiny, such that if you add a big and a tiny,
the tiny add-on never shows up, because it "falls off the end"
of the number of bits allocated for the characteristic and
mantessa (these terms might be incorrect, but I simply
mean the two numerical parts a real is represented by in
the computer (hardware) you are using).

So it's like you never added-on the tiny number, as far
as the result you get.

However, suppose you had *lots* of those tiny numbers,
and the result of adding *those* up gives you a result
several orders of magnitude larger than the typical
single tiny one.

Now, the calculation order makes all the difference!

If you add up the big numbers before you start adding on to
the thus-far sum the the tiny ones, no matter how many
gillions of them you add in (one by one), the sum never
changes, not even by one bit.

However, if you add them up smallest first, then
the tiny ones *do* get counted -- well, their *sum*
does, assuming that that sum has gotten to be large enough
as to not be shoved off the end by the following large
numbers.



Does what I'm trying to say come across at all?


Thanks,

David




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

Date: Thu, 18 Sep 2003 20:37:23 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: perl lib all over the place
Message-Id: <slrnbmknej.d6p.tadmc@magna.augustmail.com>

ko <kuujinbo@hotmail.com> wrote:

> perl -e 'print "$_\n" foreach (@INC)'


But that won't win any golf contests.   :-)

   perl -V

will show @INC's contents too.


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


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

Date: 18 Sep 2003 21:18:56 -0700
From: benson@lemon-asia.com (Benson)
Subject: Perl program need in regular expression
Message-Id: <5853c030.0309182018.69edbcc1@posting.google.com>

I want a program can read a log file and capture the character seg=9543
The file log line like this

"Webtrends=219.65.94.207.13841063300606-888510000; SESSION=%7EgrfwSipoiI; seg=9543"

Capture character set "seg=9543"
get the value of number 9543 to a valuable. for calculation.

How to use regular expression get the value number 9543?


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

Date: Fri, 19 Sep 2003 07:39:40 +0200
From: Lao Coon <laocoon@fastmail.fm>
Subject: Re: Perl program need in regular expression
Message-Id: <bke4qr$kpu$01$1@news.t-online.com>

benson@lemon-asia.com (Benson) wrote in
news:5853c030.0309182018.69edbcc1@posting.google.com: 

> I want a program can read a log file and capture the character
> seg=9543 The file log line like this
> 
> "Webtrends=219.65.94.207.13841063300606-888510000;
> SESSION=%7EgrfwSipoiI; seg=9543" 
> 
> Capture character set "seg=9543"
> get the value of number 9543 to a valuable. for calculation.
> 
> How to use regular expression get the value number 9543?

Read perldoc perlre

e.g.

my $value, $string = "Webtrends=219.65.94.207.13841063300606-888510000;
> SESSION=%7EgrfwSipoiI; seg=9543";

if ($string =~ /seg=(\d+)/) {
    	$value = $1;
}


Lao


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

Date: Fri, 19 Sep 2003 00:46:14 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Perl program need in regular expression
Message-Id: <slrnbml616.efm.tadmc@magna.augustmail.com>

Benson <benson@lemon-asia.com> wrote:

> "Webtrends=219.65.94.207.13841063300606-888510000; SESSION=%7EgrfwSipoiI; seg=9543"
> 

> How to use regular expression get the value number 9543?


Assuming the line is in $_ :

   my($num) = /seg=(\d+)/;


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


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

Date: Thu, 18 Sep 2003 20:34:55 -0500
From: "Eric J. Roode" <REMOVEsdnCAPS@comcast.net>
Subject: Re: referencing, closures, classes
Message-Id: <Xns93FADB86A90D1sdn.comcast@206.127.4.25>

-----BEGIN xxx SIGNED MESSAGE-----
Hash: SHA1

David,

    I would *strongly* recommend Damian Conway's excellent book, _Object 
Oriented Perl_.  It covers references, closures, objects, and classes in 
great detail, and is very readable and clear, imho.  Well worth the cover 
price.

    In a nutshell:  A reference is a scalar value that holds information 
about a scalar, array, hash, subroutine, filehandle, etc.  It is sort of 
analogous to a pointer in C or Pascal (if you know C or Pascal), except 
that it holds more information than just a pointer.  References are _very_ 
useful, and understanding them is key to becoming an intermediate to 
advanced Perl programmer.

    A closure is more subtle.  It is a reference to an anonymous subroutine 
(that is, a subroutine that has been defined with a naked "sub" declaration 
and no name), and which refers to one or more lexical ("my") variables that 
are declared outside the scope of the subroutine definition.  The clever 
and magical thing that happens is that the closure "remembers" the values 
of those lexical variables, even if they change later.  More specifically, 
at the time the anonymous subroutine is stored, it gets a private copy of 
the lexical variables it references outside its scope.  This is rather 
useful in some circumstances. 

- -- 
Eric
$_ = reverse sort $ /. r , qw p ekca lre uJ reh
ts p , map $ _. $ " , qw e p h tona e and print

-----BEGIN xxx SIGNATURE-----
Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com>

iQA/AwUBP2pdNGPeouIeTNHoEQKT8QCgmqPbjHO2OVRb/2oX1vHc1GEiP2AAoI0R
9gItgTctedFY6T9rsourDj2o
=RGc2
-----END PGP SIGNATURE-----


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

Date: 18 Sep 2003 19:16:51 -0700
From: toddrw69@excite.com (trwww)
Subject: Re: Splitting up an XML File
Message-Id: <d81ecffa.0309181816.7cba98d7@posting.google.com>

jeffg@programmer.net (JAG) wrote in message news:<6b40b6b9.0309180733.6cdcb2c8@posting.google.com>...
> toddrw69@excite.com (trwww) wrote in message news:<d81ecffa.0309171902.596dfa99@posting.google.com>...
> > jeffg@programmer.net (JAG) wrote in message news:<6b40b6b9.0309171009.20d66b6a@posting.google.com>...
> > > I have an XML file that looks like this:
> > > 
<snip />
> > > 
> > > There are some nested elements in the real file, so I think 
> > > XML::Simple won't work for this.
> > > 
> > > Any ideas about how I can do this?  I don't need to do any processing 
> > > (at least not now) - just reading and writing smaller chunks.
> > > 
> > 
> > This uses one of my favorite modules, XML::XPath:
> > 
> > [trwww@waveright trwww]$ perl
> > use warnings;
> > use strict;
> > use XML::XPath;
> > use IO::File;
> > 
> > my($xp) = XML::XPath->new( xml => join('', <DATA>) );
> > my($nodeset) = $xp->find(  '/root/economist' );
> > 
> > my($ext) = 0;
> > 
> > foreach my $record ( $nodeset->get_nodelist() ) {
> >   IO::File->new('> record.'.$ext++)->print($record->toString());
> > }
> > 
> > __DATA__
> > <root>
<snip />
> 
> Thanks!  This works beautifully. 

of course =0)

> Now, here are two more things.

No thank you.

> 
> Instead of naming the files record.[0..n], I want each 
> output file to have the name of the person.  
> So these two files would be named Jane.Smith and John.Doe
> 
> Also, within each <economist> element, there is now an element
<snip />
> 
> So this would produce the same two files your original code produced, 
> but named John.Doe and Jane.Smith and also without the <work> element.  
> Instead of printing the work element in this file, it should be printed 
> in its own file, in this case, called Smith_work and Doe_work.
> 

I replied to your post to show you and CLPM lurkers how easy
XML::XPath is to use.

If you need a consultant, email me off-list at sendwade@hotmail.com

Otherwise, read the XML::XPath documentation. What you propose above
is trivial to implement with XPath.

Todd W.


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

Date: Thu, 18 Sep 2003 21:54:30 -0700
From: "Tom" <tom@nosleep.net>
Subject: Re: wtf is the deal?
Message-Id: <3f6a8b5c$1@nntp0.pdx.net>



"Tad McClellan" <tadmc@augustmail.com> wrote in message
news:slrnbmj9gk.a5h.tadmc@magna.augustmail.com...
> Tom <tom@nosleep.net> wrote:
> > I'm sorry, there must be something wrong with my isp news again, as I
don't
> > see any responses at all.
> > I'm not sure why yours showed up, but the others didn't. I did not cross
> > post, so they must have showed up out of my thread.
>
>
> You've been asked to stop top-posting, yet you are still top-posting.
>
> Many people will killfile you for that. Maybe that is why you aren't
> getting enough helpful responses...

Omg, I removed all the other text and got yelled at for that. I for the life
of me cannot understand what people's problem is with where the text goes.
I'm an R&D Engineer and write thousands of emails a year discussing
technical data and not one in thousands that I have received, had new text
at the bottom. I don't know an Engineer that would bother to search a large
email for it. It's a hassle, in usenet and email, to search through an email
or at the bottom, especially when having to read many messages. Click and
scope first two lines and if interesting or important, read the rest.
Otherwise, move on.
Having to scroll to the bottom is both a joke and cumbersome.
I just don't get it. Important/new stuff UP where it can be read.
I suppose this is different for people who absoultely thrive on reading
usenet threads, but for someone who reads and writes tons of technicals at
their job 12+ hours a day, and again at night researching, it's a huge PITA.

I'm just being honest here and am not trying to offend anyone or get
killfiled, esp. since it has been so helpful now that someone answered.
The part of my script with dbms is working now, thanks!

Tom




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

Date: Fri, 19 Sep 2003 05:36:22 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: wtf is the deal?
Message-Id: <x74qz9s5k9.fsf@mail.sysarch.com>

>>>>> "T" == Tom  <tom@nosleep.net> writes:

  T> Omg, I removed all the other text and got yelled at for that. I for
  T> the life of me cannot understand what people's problem is with
  T> where the text goes.  I'm an R&D Engineer and write thousands of
  T> emails a year discussing technical data and not one in thousands
  T> that I have received, had new text at the bottom. I don't know an
  T> Engineer that would bother to search a large email for it. It's a
  T> hassle, in usenet and email, to search through an email or at the
  T> bottom, especially when having to read many messages. Click and
  T> scope first two lines and if interesting or important, read the
  T> rest.  Otherwise, move on.  Having to scroll to the bottom is both
  T> a joke and cumbersome.  I just don't get it. Important/new stuff UP
  T> where it can be read.  I suppose this is different for people who
  T> absoultely thrive on reading usenet threads, but for someone who
  T> reads and writes tons of technicals at their job 12+ hours a day,
  T> and again at night researching, it's a huge PITA.

and do you like to work backwards in time as well? consider the history
of email and usenet where bandwidth and storage costs were very high. so
you respected other people's systems by editing out unneeded text and to
keep context flowing, you added your commented below since we read from
top to bottom. 

now with cheap bandwidth and storage, and the generation of clods raised
on winblows where you are taught not to care about anything, let alone
how other people work, top posting has infected the usenet/email space
and is the most virulent virus yet.

i have to deal with this in other areas and i have taught a few
(including my non-tech wife) how to edit and post. but there are too
many out there who will not get it. reading backwards seems natural to
them now just like \ is now called slash and / is called forward
slash. 

  T> I'm just being honest here and am not trying to offend anyone or get
  T> killfiled, esp. since it has been so helpful now that someone answered.
  T> The part of my script with dbms is working now, thanks!

the offense was not the first time you top posted but the second and
later ones after you were asked to not do it. this group (and others on
usenet) are one of the few havens of proper posting and editing. long
may that standard rule!

uri

-- 
Uri Guttman  ------  uri@stemsystems.com  -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs  ----------------------------  http://jobs.perl.org
Damian Conway Class in Boston - Sept 2003 -- http://www.stemsystems.com/class


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

Date: Fri, 19 Sep 2003 00:49:35 -0500
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: wtf is the deal?
Message-Id: <slrnbml67f.efm.tadmc@magna.augustmail.com>

Tom <tom@nosleep.net> wrote:
> "Tad McClellan" <tadmc@augustmail.com> wrote in message
> news:slrnbmj9gk.a5h.tadmc@magna.augustmail.com...
>> Tom <tom@nosleep.net> wrote:

> I for the life
> of me cannot understand what people's problem is with where the text goes.


*plonk*


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


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

Date: Fri, 19 Sep 2003 06:37:36 +0000 (UTC)
From: "David H. Adler" <dha@panix.com>
Subject: Re: wtf is the deal?
Message-Id: <slrnbml91g.j3k.dha@panix2.panix.com>

In article <3f6a8b5c$1@nntp0.pdx.net>, Tom wrote:

[snip longer discussion of top posting issues]

> Having to scroll to the bottom is both a joke and cumbersome.
> I just don't get it. Important/new stuff UP where it can be read.

That's the point.  Context *is* important.  The idea is that you trim
out the stuff that isn't relevant to your reply.  That way there isn't
anything irrelevant to "scroll to the bottom" of.

As a side note, most of the time (as I see it, anyway) the people who
killfile for top posting are not doing it as a personal affront.  They
are simply using a technique that helps them wade through the large
amount of traffic here, i.e. putting people who wish not to provide
appropriate context in their messages - a habit which they feel takes up
yet more of their time - out of sight.

dha

-- 
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
"You can't give a 4 to truth." - Saul Williams


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

Date: Sat, 19 Jul 2003 01:59:56 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: 
Message-Id: <3F18A600.3040306@rochester.rr.com>

Ron wrote:

> Tried this code get a server 500 error.
> 
> Anyone know what's wrong with it?
> 
> if $DayName eq "Select a Day" or $RouteName eq "Select A Route") {

(---^


>     dienice("Please use the back button on your browser to fill out the Day
> & Route fields.");
> }
 ...
> Ron

 ...
-- 
Bob Walton



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

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


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