[19704] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 1899 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Oct 9 18:05:52 2001

Date: Tue, 9 Oct 2001 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)
Message-Id: <1002665106-v10-i1899@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Tue, 9 Oct 2001     Volume: 10 Number: 1899

Today's topics:
    Re: CGI.pm :: OO or not? <tim@vegeta.ath.cx>
    Re: CGI.pm :: OO or not? (Malcolm Dew-Jones)
    Re: Help -- array/hash headaches <iltzu@sci.invalid>
        how to connect to Sybase <m.astrakhanskaya@gte.net>
    Re: how to connect to Sybase <ron@indra.com>
    Re: how to connect to Sybase <m.astrakhanskaya@gte.net>
    Re: how to connect to Sybase <ron@indra.com>
        How to go up stack trace? <bill02115@hotmail.com>
    Re: How to go up stack trace? <ron@indra.com>
    Re: How to run perl under bash not sh (Abigail)
    Re: pid list of childs <djberge@qwest.com>
    Re: pid list of childs (Abigail)
    Re: regex substitution <bart.lateur@skynet.be>
    Re: regex substitution <bart.lateur@skynet.be>
    Re: Skimming an array for non-undef <djberge@qwest.com>
    Re: Stupid question... (Andrea)
    Re: Stupid question... (Andrea)
    Re: Stupid question... <lmoran@wtsg.com>
    Re: Stupid question... (Abigail)
    Re: use strict my $foo = "";  Bug? (Abigail)
        using s/// <paulrichardson@sbcglobal.net>
    Re: using s/// <Laocoon@eudoramail.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: Tue, 09 Oct 2001 20:10:59 GMT
From: Tim Hammerquist <tim@vegeta.ath.cx>
Subject: Re: CGI.pm :: OO or not?
Message-Id: <slrn9s6n8u.h1b.tim@vegeta.ath.cx>

Me parece que Lou Moran <lmoran@wtsg.com> dijo:
>  --I just started using CGI.pm and I have noticed that while perldoc
>  CGI recomends OO funtionality but I rarely see it in use.
>  
>  --Several of the books/tutorials mention that you can use references
>  but that "function based" CGI(.pm) is easier to read so they use that
>  instead.
>  
>  --So if --*YOU*-- were using CGI.pm to accomplish some task would you
>  write it utilizing the OO approach or the function based approach?
>  
>  --
>  TMTOWTDI: My way tends to be wrong...
>  lmoran@wtsg.com

Just another vote of the OO IF.  All of my CGIs that use CGI.pm start
like this:

#!/usr/bin/perl

use strict;
use CGI;
my $q = new CGI;

As Ilya says, I don't really use the HTML generation functions.  A major
argument for OO is I don't have to worry about what :tags to import in
my use statement.  If I have my CGI object, it's all right there, and it
won't clog up my namespaces (another important point).

HTH
Tim
-- 
A diplomatic husband said to his wife, "How do you expect me to remember
your birthday when you never look any older?"


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

Date: 9 Oct 2001 14:38:35 -0800
From: yf110@vtn1.victoria.tc.ca (Malcolm Dew-Jones)
Subject: Re: CGI.pm :: OO or not?
Message-Id: <3bc36e5b@news.victoria.tc.ca>

Lou Moran (lmoran@wtsg.com) wrote:
: --I just started using CGI.pm and I have noticed that while perldoc
: CGI recomends OO funtionality but I rarely see it in use.

: --Several of the books/tutorials mention that you can use references
: but that "function based" CGI(.pm) is easier to read so they use that
: instead.

: --So if --*YOU*-- were using CGI.pm to accomplish some task would you
: write it utilizing the OO approach or the function based approach?

I prefer non-oo because "param('name')" does not require any munging if
used within an html template, unlike "$cgi->param('name')"  which often
does (need to be munged).

If you wanted to track more than one query then that would be a good
reason to use the OO syntax. 

For example I could imagine using two cgi objects to keep clearly seperate
incoming and outgoing parameters, or I could imagine wanting to access
both the "current" query and also a "previous" query.  (I could imagine
this, but haven't used it so myself.) 

Or if you wish to use CGI as the base class for your own CGI handler
routines then the OO syntax would be what you wanted.



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

Date: 9 Oct 2001 21:47:15 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Help -- array/hash headaches
Message-Id: <1002663266.14239@itz.pp.sci.fi>

In article <m3adz5zudg.fsf@fiddler.u.washington.edu>, viscido@u.washington.edu wrote:
>> >for ($fish=1, $fish <= $n, $fish++) {
>> >  # For each fish, set its $schoomates{$fish} to "empty"
>> >  $schoolmates{$fish} = [];
>> >}
>
>Actually, I missed something obvious (logically) but easy to miss
>(visually). Look up at the for (....) line. See it? Yup. I had commas
>there instead of semi-colons. Arrggh.... This syntax caused $fish = 2

One more reason to avoid C-style for loops in Perl.  :-)

  for my $fish (1 .. $n-1) {
      $schoolmates{$fish} = [];
  }

(Is that <= a bug, BTW?  Should last fish by number $n or $n-1?)

It also occurs to me that you're needlessly duplicating information.
You already have lists of the fish in each group, so you could just
store the group number for each fish.

-- 
Ilmari Karonen -- http://www.sci.fi/~iltzu/
"Get real!  This is a discussion group, not a helpdesk.  You post something,
we discuss its implications.  If the discussion happens to answer a question
you've asked, that's incidental."           -- nobull in comp.lang.perl.misc



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

Date: Tue, 09 Oct 2001 19:48:39 GMT
From: "Maya" <m.astrakhanskaya@gte.net>
Subject: how to connect to Sybase
Message-Id: <rwIw7.45$6m1.13656@paloalto-snr1.gtei.net>

Hi, I need to connect to Sybase server from
my script. How could I do this using DBI?

--
Maya




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

Date: Tue, 09 Oct 2001 14:28:32 -0600
From: Ron Reidy <ron@indra.com>
Subject: Re: how to connect to Sybase
Message-Id: <3BC35DF0.4DBF308F@indra.com>

Maya wrote:
> 
> Hi, I need to connect to Sybase server from
> my script. How could I do this using DBI?
> 
> --
> Maya
1.  Install DBD::Sybase, and all of its' dependent modules.
2.  Read POD docs

Viola!
-- 
Ron Reidy
Oracle DBA
Reidy Consulting, L.L.C.


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

Date: Tue, 09 Oct 2001 20:54:12 GMT
From: "Maya" <m.astrakhanskaya@gte.net>
Subject: Re: how to connect to Sybase
Message-Id: <UtJw7.33$_z1.14367@paloalto-snr1.gtei.net>

I found this module on perl.com , but I am not sure that it would have all
dependent
modules as you mention. Could you name them , or all of them comes with the
installation package?

"Ron Reidy" <ron@indra.com> wrote in message
news:3BC35DF0.4DBF308F@indra.com...
> Maya wrote:
> >
> > Hi, I need to connect to Sybase server from
> > my script. How could I do this using DBI?
> >
> > --
> > Maya
> 1.  Install DBD::Sybase, and all of its' dependent modules.
> 2.  Read POD docs
>
> Viola!
> --
> Ron Reidy
> Oracle DBA
> Reidy Consulting, L.L.C.




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

Date: Tue, 09 Oct 2001 15:54:55 -0600
From: Ron Reidy <ron@indra.com>
Subject: Re: how to connect to Sybase
Message-Id: <3BC3722F.BB6673BA@indra.com>

Maya wrote:
> 
> I found this module on perl.com , but I am not sure that it would have all
> dependent
> modules as you mention. Could you name them , or all of them comes with the
> installation package?
> 
> "Ron Reidy" <ron@indra.com> wrote in message
> news:3BC35DF0.4DBF308F@indra.com...
> > Maya wrote:
> > >
> > > Hi, I need to connect to Sybase server from
> > > my script. How could I do this using DBI?
> > >
> > > --
> > > Maya
> > 1.  Install DBD::Sybase, and all of its' dependent modules.
> > 2.  Read POD docs
> >
> > Viola!
> > --
> > Ron Reidy
> > Oracle DBA
> > Reidy Consulting, L.L.C.
At you UNIX prompt (as root) type:

$ perl -MCPAN -e "install DBD::Sybase"

When you are prompted to install dependent modules, type "yes".
-- 
Ron Reidy
Oracle DBA
Reidy Consulting, L.L.C.


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

Date: 9 Oct 2001 17:44:58 -0400
From: bill <bill02115@hotmail.com>
Subject: How to go up stack trace?
Message-Id: <9pvr4q$oa4$1@panix3.panix.com>




In the perl debugger, how can I go up the stack trace?  I need to
examine the value of certain variables high up in the stack trace.
Thanks!
bill


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

Date: Tue, 09 Oct 2001 15:58:59 -0600
From: Ron Reidy <ron@indra.com>
Subject: Re: How to go up stack trace?
Message-Id: <3BC37322.C292C635@indra.com>

bill wrote:
> 
> In the perl debugger, how can I go up the stack trace?  I need to
> examine the value of certain variables high up in the stack trace.
> Thanks!
> bill
See 'perldoc perldebug'
-- 
Ron Reidy
Oracle DBA
Reidy Consulting, L.L.C.


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

Date: 9 Oct 2001 21:11:02 GMT
From: abigail@foad.org (Abigail)
Subject: Re: How to run perl under bash not sh
Message-Id: <slrn9s6pul.rdd.abigail@alexandra.xs4all.nl>

Larry Alkoff (invalid@nowhere.com) wrote on MMCMLX September MCMXCIII in
<URL:news:v9c4st4092nqp0nsij3c8p6ct59bnfrcgk@4ax.com>:
}} 
}} > 
}} > The OP's just another Linux user who doesn't realise /bin/sh is a link to
}} > /bin/bash
}} 
}} 
}} To follow up on my last post, I did some testing.
}} 
}} In my normal shell I type 
}} alias or al (my alias for alias)
}} and get alist of my aliases.
}} 
}} I then type the command dkdkdk
}} and get a bash: dkdkdk: command not found error message.
}} 
}} I then type the command sh which should be loading bash
}} via the soft link in /bin.  BTW, which shows /bin/sh - the soft link.
}} 
}} However ...
}} 
}} When I type
}} al
}} I get the error msg sh: al: command not found
}} 
}} When I type
}} alias
}} I draw a complete blank indicating that something knows about aliases
}} but there aren't any defined.
}} 
}} When I type  my normal test command dkdkdk
}} I get the message
}} sh: dkdkdk: command not found.
}} 
}} Now I realize that this is a perl group but I find it very strange that
}} perl is somehow using a version of sh that I can't even find on my system.
}} Maybe it's built-in?

I am confused.

You've found /bin/sh, which is a link to /bin/bash. But when Perl is
using /bin/sh, you are complaining it's using something you cannot
find yourself. What's up? A sub nanosecond attention span?



Abigail
-- 
perl -le 's[$,][join$,,(split$,,($!=85))[(q[0006143730380126152532042307].
          q[41342211132019313505])=~m[..]g]]e and y[yIbp][HJkP] and print'


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

Date: Tue, 9 Oct 2001 13:23:48 -0500
From: "Mr. Sunblade" <djberge@qwest.com>
Subject: Re: pid list of childs
Message-Id: <BcHw7.1596$IY2.167833@news.uswest.net>


"Jens Luedicke" <jens@irs-net.com> wrote in message
news:9pume4$71p$07$1@news.t-online.com...
> hi ...
>
> how can I fetch a list of pids of all fork'd child processes?
>
> I want to hangup all running childs without hanging up the
> parent.
>
> kill HUP => -$$;
>
> didn't worked like I wanted...
>
> --
> Jens Luedicke
> jens@irs-net.com

I think there a couple fork managers out there on CPAN (search.cpan.org).
Check 'em out - they may do what you need.

Regards,

Mr. Sunblade




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

Date: 9 Oct 2001 21:31:11 GMT
From: abigail@foad.org (Abigail)
Subject: Re: pid list of childs
Message-Id: <slrn9s6r4e.rdd.abigail@alexandra.xs4all.nl>

Martien Verbruggen (mgjv@tradingpost.com.au) wrote on MMCMLXI September
MCMXCIII in <URL:news:slrn9s61uf.448.mgjv@martien.heliotrope.home>:
][ On Tue, 09 Oct 2001 13:16:12 +0200,
][ 	Jens Luedicke <jens@irs-net.com> wrote:
][ > hi ...
][ > 
][ > how can I fetch a list of pids of all fork'd child processes?
][ 
][ When you fork, keep track of the pid that gets allocated.


And when you reap a child, remove the pid from your datastructure.



Abigail
-- 
perl -wle '$, = " "; sub AUTOLOAD {($AUTOLOAD =~ /::(.*)/) [0];}
           print+Just (), another (), Perl (), Hacker ();'


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

Date: Tue, 09 Oct 2001 20:37:27 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: regex substitution
Message-Id: <3sn6stold6p6ankovvvcvkfj9d3o312jrr@4ax.com>

fishy wrote:

>I want to substitute a regexp in a text.
>E.g.
>while (<>) {
>    if ($_ =~ /(^| |\.)(B|b)ij(\n| |\.)/) {
>        s/(^| |\.)(B|b)ij(\n| |\.)/ /g;
>        }
>}
>
>The problem is that this only substitutes the first
>appearance of the regexp and ignores any further instances of that
>regexp on the same line. So if the line says:
>
>bij de bakker en niet bij de kapper
>
>Then the result is:
>
>de bakker en niet bij de kapper
>
>I want both instances of 'bij' deleted from the line. Is there some way of
>doing this the right way?

First of all, you're working to hard. There's no need for the match AND
the substitution. Just the substitution is enough. If nothing is found,
nothing happens.

And second, for me, the reduced version works.

	$_ = "Bij de bakker en niet bij de kapper.\n";
	s/(^| |\.)(B|b)ij(\n| |\.)/ /g;
	print;
-->
	 de bakker en niet de kapper.

I'm not sure if you copy/pasted the code correctly, because it seems to
be working fine.

-- 
	Bart.


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

Date: Tue, 09 Oct 2001 20:40:47 GMT
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: regex substitution
Message-Id: <r0o6st8ahdpl03s49aj2or2nbhi05gqgtp@4ax.com>

Jessica Bull wrote:

>your regex specifies that it has to be at the beginning of a line. 

Bellony. He's using /^/ in alternatives, and he wants it to match 

 - at the beginning of the string, or
 - after a space, or
 - after a dot.

That's what it does.

His code works for me.

-- 
	Bart.


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

Date: Tue, 9 Oct 2001 13:22:21 -0500
From: "Mr. Sunblade" <djberge@qwest.com>
Subject: Re: Skimming an array for non-undef
Message-Id: <ebHw7.1592$IY2.167392@news.uswest.net>


"Derek Fountain" <nomail@hursley.ibm.com> wrote in message
news:9pu9st$1sk2$1@sp15at20.hursley.ibm.com...
> I have a long array which has a number of values in the first n elements,
> and from there on all the values are undef. What would be the most
> efficient way of finding the index of the last element of the array which
> contains a value?
>
> I seem to have come up with any number of really clunky ways to do it.
> What's the "perl solution"?
>

If you prefer an OO solution:

my $sao = Set::Array->new(qw(1 2 3 4 undef undef undef));
my $index = $sao->index('undef') -1;
print "Index was: $index\n";  # prints 3

or, as a one-liner:

print "Index was: ", Set::Array->new(qw(1 2 3 4 undef undef
undef))->index('undef') -1, "\n";

Regards,

Mr. Sunblade




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

Date: 9 Oct 2001 11:39:37 -0700
From: rubash@navigatenewmedia.com (Andrea)
Subject: Re: Stupid question...
Message-Id: <16986fd1.0110091039.61025772@posting.google.com>

nobull@mail.com wrote in message news:<u9bsjhm4y3.fsf@wcl-l.bham.ac.uk>...
> rubash@navigatenewmedia.com (Andrea) writes:
> > Newsgroups: comp.lang.perl.misc
> > Subject: Re: Stupid question...
> 
> Yep, sure is.
> 
> [ snip: How can I tell what input is expected by a program in some
> unknown language and the source of which I can't examine? ]
> 
> Answer: ask someone who knows something a about the program in question.
> 
> Now, did you have a Perl question?

WOW... That was about the rudest response to an honest question I've
heard in quite a while.  gee.. I'm sure glad I came to THIS newsgroup.

I thought PERHAPS there was some TRICK to examining the script.  I
used a similar one to grab the variable names from the script by
sending through bogus info.  However, YOU in your desire to look
intelligent, failed to even address the question.  Way to look smart. 
I mean... geez..I'm a PERL novice and even *I* managed to get some
information out of the script without accessing it...  I thought maybe
a self-proclaimed PERL god like yourself might have a LITTLE more to
offer than someone who has been working with PERL for a week or so. 
My mistake.

If you don't want to help, you shouldn't waste your time and mine by
bothering to post at all.


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

Date: 9 Oct 2001 11:47:12 -0700
From: rubash@navigatenewmedia.com (Andrea)
Subject: Re: Stupid question...
Message-Id: <16986fd1.0110091047.40aeb2a6@posting.google.com>

Martien, 

Thanks for the quick reply.  I was reluctant to contact them because
they give so little info in their documentation.. it was almost like
it should be SO obvious.  I felt a little foolish logging a support
request if there was something I might be missing.

I'll contact them on this.

Thanks again!
Andrea

mgjv@tradingpost.com.au (Martien Verbruggen) wrote in message news:<slrn9s5mu6.448.mgjv@martien.heliotrope.home>...
> On 9 Oct 2001 03:23:48 -0700,
> 	Andrea <rubash@navigatenewmedia.com> wrote:
> > I have my site set up to use the standard form mail from my hosting
> > company (dellhost).  Everything works, because the variable names were
> > listed in the sample HTML document...  (it's not the same formmail as
> > the one at Matt's Script Archive)
> > 
> > However, I can't access the script.. and the standard redirect = URL
> > has no effect.  So... instead of my nice little thank you page, users
> > get an ugly white page with black text.
> > 
> > I have no idea how to tell this script that I haven't even seen where
> > to direct users when they have submitted an e-mail.  How do I find out
> > what variable they are using so I can tell the script to direct my
> > users there?
> 
> I think you'll have to ask your hosting company.
> 
> It is very unlikely that anyone here knows anything about that program,
> since the only thing you can tell us about it is that 
> 
> 1) it is 'the standard' from your 'hosting company'.
> 2)  It is not Matt's Script Archive's formmail (thank heavens)
> 3) You can't 'access' it
> 4) Users get an ugly white page
> 
> That sounds like some 451,234 (on last count) different formmail
> programs would fit that description.
> 
> The _only_ people who can help you are the people you pay to run this
> thing.
> 
> Martien


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

Date: Tue, 09 Oct 2001 15:53:04 -0400
From: Lou Moran <lmoran@wtsg.com>
Subject: Re: Stupid question...
Message-Id: <r3l6stc6svl3gnk8s3sfm4jh70ck24ibub@4ax.com>

On 9 Oct 2001 11:39:37 -0700, rubash@navigatenewmedia.com (Andrea)
wrote wonderful things about sparkplugs:

>nobull@mail.com wrote in message news:<u9bsjhm4y3.fsf@wcl-l.bham.ac.uk>...
>> rubash@navigatenewmedia.com (Andrea) writes:
>> > Newsgroups: comp.lang.perl.misc
>> > Subject: Re: Stupid question...
>> 
>> Yep, sure is.
>> 
>> [ snip: How can I tell what input is expected by a program in some
>> unknown language and the source of which I can't examine? ]
>> 
>> Answer: ask someone who knows something a about the program in question.
>> 
>> Now, did you have a Perl question?
>
>WOW... That was about the rudest response to an honest question I've
>heard in quite a while.  gee.. I'm sure glad I came to THIS newsgroup.
>
>I thought PERHAPS there was some TRICK to examining the script.  I
>used a similar one to grab the variable names from the script by
>sending through bogus info.  However, YOU in your desire to look
>intelligent, failed to even address the question.  Way to look smart. 
>I mean... geez..I'm a PERL novice and even *I* managed to get some
>information out of the script without accessing it...  I thought maybe
>a self-proclaimed PERL god like yourself might have a LITTLE more to
>offer than someone who has been working with PERL for a week or so. 
>My mistake.
>
>If you don't want to help, you shouldn't waste your time and mine by
>bothering to post at all.

I hope you have a flame retardant suit on.  So after a week of working
with Perl (note the case, many are very sensitive about it) you're a
novice...  Impressive.

Further I prefer nobull's posts greatly over yours.  Heck, I prefer
nobull's responses to post like yours!  Anyway, Andrea, your question
wasn't really Perl (case!) related.  At best it was:

How can I get at source code?

anylou... good luck in your endevors.

PS - If that post upset you lurk for a while here, that was a nice
response!

--
TMTOWTDI: My way tends to be wrong...
lmoran@wtsg.com


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

Date: 9 Oct 2001 21:33:18 GMT
From: abigail@foad.org (Abigail)
Subject: Re: Stupid question...
Message-Id: <slrn9s6r8c.rdd.abigail@alexandra.xs4all.nl>

Andrea (rubash@navigatenewmedia.com) wrote on MMCMLXI September MCMXCIII
in <URL:news:16986fd1.0110091039.61025772@posting.google.com>:
&& nobull@mail.com wrote in message news:<u9bsjhm4y3.fsf@wcl-l.bham.ac.uk>...
&& > rubash@navigatenewmedia.com (Andrea) writes:
&& > > Newsgroups: comp.lang.perl.misc
&& > > Subject: Re: Stupid question...
&& > 
&& > Yep, sure is.
&& > 
&& > [ snip: How can I tell what input is expected by a program in some
&& > unknown language and the source of which I can't examine? ]
&& > 
&& > Answer: ask someone who knows something a about the program in question.
&& > 
&& > Now, did you have a Perl question?
&& 
&& WOW... That was about the rudest response to an honest question I've
&& heard in quite a while.  gee.. I'm sure glad I came to THIS newsgroup.
&& 
&& I thought PERHAPS there was some TRICK to examining the script.  I
&& used a similar one to grab the variable names from the script by
&& sending through bogus info.  However, YOU in your desire to look
&& intelligent, failed to even address the question.  Way to look smart. 
&& I mean... geez..I'm a PERL novice and even *I* managed to get some
&& information out of the script without accessing it...  I thought maybe
&& a self-proclaimed PERL god like yourself might have a LITTLE more to
&& offer than someone who has been working with PERL for a week or so. 
&& My mistake.


*plonk*



Abigail
-- 
perl -wle 'print sub {} -> ("Just another Perl Hacker")'
#    The Bear Hunter departs
#    beside a dam. A flying
#    raven. Or Wunt.


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

Date: 9 Oct 2001 21:23:19 GMT
From: abigail@foad.org (Abigail)
Subject: Re: use strict my $foo = "";  Bug?
Message-Id: <slrn9s6qlm.rdd.abigail@alexandra.xs4all.nl>

Greg Bacon (gbacon@HiWAAY.net) wrote on MMCMLXI September MCMXCIII in
<URL:news:ts4h3qano8j5d2@corp.supernews.com>:
;; In article <slrn9s4dfj.q4k.abigail@alexandra.xs4all.nl>,
;;     Abigail <abigail@foad.org> wrote:
;; 
;; : [...]
;; : OTOH, (un)import of strict.pm could do some argument checking. I will
;; : write a patch tomorrow and submit it to p5p for review. It may not be
;; : accepted though.
;; 
;; This issue has come up several times on p5p:
;; 
;;     <URL:http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2000-01/msg01230.html>
;;     <URL:http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2000-01/msg01175.html>


Do you know why the patch was never accepted?



Abigail
-- 
sub camel (^#87=i@J&&&#]u'^^s]#'#={123{#}7890t[0.9]9@+*`"'***}A&&&}n2o}00}t324i;
h[{e **###{r{+P={**{e^^^#'#i@{r'^=^{l+{#}H***i[0.9]&@a5`"':&^;&^,*&^$43##@@####;
c}^^^&&&k}&&&}#=e*****[]}'r####'`=437*{#};::'1[0.9]2@43`"'*#==[[.{{],,,1278@#@);
print+((($llama=prototype'camel')=~y|+{#}$=^*&[0-9]i@:;`"',.| |d)&&$llama."\n");


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

Date: Tue, 09 Oct 2001 21:36:11 GMT
From: Paul Richardson <paulrichardson@sbcglobal.net>
Subject: using s///
Message-Id: <3BC34316.2020603@sbcglobal.net>

I am trying to substitute a blank space for the string
"/* unconnected */" (the target string is w/o quotes). I can
eliminate the "* unconnected *" portion but can get rid of the
slashes. I have searched my perl pbbok to no avail though it was late
last night so who knows. Can someone give me some help. I am sure I'll
go "doooohhhhh!!!" once I see the answer

Thanks in advance


-- 
----------
Paul Richardson
paulrichardson@sbcglobal.net
Oakland, California



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

Date: Tue, 9 Oct 2001 23:47:43 +0200
From: Laocoon <Laocoon@eudoramail.com>
Subject: Re: using s///
Message-Id: <Xns9135F2127C636Laocooneudoramailcom@62.153.159.134>

either s#"/\* unconnected \*/"# #g;
or     s/"\/\* unconnected \*\/"/ /g;

Ur going doooooh yet? ;)


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

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


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