[29336] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 580 Volume: 11

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jun 26 14:14:38 2007

Date: Tue, 26 Jun 2007 11:14:30 -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           Tue, 26 Jun 2007     Volume: 11 Number: 580

Today's topics:
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <bik.mido@tiscalinet.it>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
    Re: FAQ 1.6 What is perl6? <savagebeaste@yahoo.com>
        Forking and SSH connections <jrpfinch@gmail.com>
    Re: Forking and SSH connections xhoster@gmail.com
    Re: gcc help  rogv24@yahoo.com
    Re: How can I overload the build in array type? <ilias@lazaridis.com>
        How to replace the "\" in "C:\myrootr\folder" with "/"   sv2021@gmail.com
    Re: How to replace the "\" in "C:\myrootr\folder" with  <asuter@cisco.com>
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: Tue, 26 Jun 2007 10:05:14 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <o1i183511ir618h1pui3je1316ktfn93ih@4ax.com>

On Mon, 25 Jun 2007 16:42:12 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>> (I included 2 of the most common ones in my reply above.)
>
>One of which was your own. Looking up through the thread I only 
>miss-spelled "soem", tell me how this some how translates into a 
>"persona-of-the-day" ?

Actually:

: seen soem regualars reepatedly tell people not to reinvent whats already 
         ^^     ^       ^^                                      ^^ 
         ^^     ^       ^^                                      ^^
          1     2        3                                       4

In one line...

>> > I'm sorry if I offended you,
>>
>>
>> No you're not.
>
>That was sarcasm. I was poking fun at your idoicy.
                                              ^^
                                              ^^
                                               *

Please tell me *this* is a joke! :-)


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 10:08:06 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <17i183dtr1veq0tr7qb0j9p6iekuj69igq@4ax.com>

On Mon, 25 Jun 2007 16:52:24 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>......................for the love of perls and heavenly grace, it was a 
>typo. Not exactly what I would declare a worthy candidate for the 
>Spanish Inquisition. It happens. "Speed type" doesn't necessary mean I 

Sorry for me giving the impression of being an inquisitor. I just feel
a little idiot for re-reading what I wrote once or twice before
posting - and still leaving typos and thinkos, of course. Maybe I'm
just an idiot to *respect* the intended recipients of my writings.
Doesn't seem a rewarding behaviour after all...


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 10:01:43 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <jth183l2p502ge17ovsms1amsj20sbcpm4@4ax.com>

On Mon, 25 Jun 2007 16:02:08 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>> I think you missed Tad's joke:
>>>> If some famous Perl guy would of jsut implemented
>
>If you consider that a joke, then I'd urge neither of you to give up 
>your day jobs.
>
>Anyhow, I still don't see what relevant baring it had on the topic.

Nor do I what these additional flamebaiting rants of your could have
on it...


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 10:26:03 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <96j183tcj0pkpela5euo3nl7bc9dkvjb52@4ax.com>

On Mon, 25 Jun 2007 16:06:32 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>Well I understand that. I think it's still a valid point that if you're 
>writting a single file script, "using 'my' at the top of the main code" 
>is effectively a global to the rest of the program. Having 'our' or 'my' 
>at the top makes no difference in simple scripts at least.

Fair enough. But then C<our> will put stuff in the stash, thus better
to stick with C<my> anyway, which will only touch the lexical pad -
now, if only the pad itself were a magic package as in Perl 6! The
point still being that even in simple scripts as a general rule one
should take the disciplined approach of declaring (lexical) variables
as close as possible to the scope they're used in. Further, C<our>'s
semantics can be slightly confusing to the uninitiated...


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 07:56:50 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ecnpoF38htg4U1@mid.individual.net>

Michele Dondi wrote:
> On Mon, 25 Jun 2007 16:02:08 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
> > > I think you missed Tad's joke:
> > > > > If some famous Perl guy would of jsut implemented
> >
> > If you consider that a joke, then I'd urge neither of you to give up
> > your day jobs.
> >
> > Anyhow, I still don't see what relevant baring it had on the topic.
>
> Nor do I what these additional flamebaiting rants of your could have
> on it...

And you don't see the hypocrisy in that statement? Tad decided to 
provoke an argument as if the universe depends on perfect typing, and 
yet _I'm_ flamebaiting? And then you jumped in with your infinite wisdom 
to defend him... and accuse ME of flamebaiting? Do you really not see 
how backwards you are on this?

-- 
CL

"Humor brings insight and tolerance. Irony brings a deeper and less 
friendly understanding." 




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

Date: Tue, 26 Jun 2007 08:12:31 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5econ5F35vtd3U1@mid.individual.net>

Michele Dondi wrote:
> On Mon, 25 Jun 2007 16:52:24 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
>> ......................for the love of perls and heavenly grace, it
>> was a typo. Not exactly what I would declare a worthy candidate for
>> the Spanish Inquisition. It happens. "Speed type" doesn't necessary
>> mean I
>
> Sorry for me giving the impression of being an inquisitor. I just feel
> a little idiot for re-reading what I wrote once or twice before
> posting - and still leaving typos and thinkos, of course. Maybe I'm
> just an idiot to *respect* the intended recipients of my writings.
> Doesn't seem a rewarding behaviour after all...

Well when you're making a universe-sized stink about a grain of sand you 
do tend to come across as rather anal, and thus, perhaps not as you 
intended. And even as you committed the same act of indiscretion that I 
chastised for, I nevertheless will not make a federal court case out of 
it like some people.

-- 
CL 




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

Date: Tue, 26 Jun 2007 08:21:31 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ecp81F37p2h0U1@mid.individual.net>

Michele Dondi wrote:
> On Mon, 25 Jun 2007 16:06:32 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
>> Well I understand that. I think it's still a valid point that if
>> you're writting a single file script, "using 'my' at the top of the
>> main code" is effectively a global to the rest of the program.
>> Having 'our' or 'my' at the top makes no difference in simple
>> scripts at least.
>
> Fair enough. But then C<our> will put stuff in the stash, thus better
> to stick with C<my> anyway, which will only touch the lexical pad -
> now, if only the pad itself were a magic package as in Perl 6!

Well, in Perl 5 isn't there an implicit 'main::' package? I realize it 
may not be the same as this "magic package" you speak of, but still then 
I think it would be better said that declaring C<my>'s (to borrow your 
style) at the "top" of the 'main' code body is really making a package 
level/scope variable, effectively making it a global to the perspective 
to anything in the package?

> The point still being that even in simple scripts as a general rule 
> one
> should take the disciplined approach of declaring (lexical) variables
> as close as possible to the scope they're used in. Further, C<our>'s
> semantics can be slightly confusing to the uninitiated...

Agreed. Good practice is good practice. It's a general rule in most 
programming to scope where as close as needed (no need for a global when 
you're using said variable in a single function.)

-- 
CL 




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

Date: Tue, 26 Jun 2007 17:50:30 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <k9d2831f9jb6l1h0dsdp2sl0nl51lnuusv@4ax.com>

On Tue, 26 Jun 2007 07:56:50 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>> Nor do I what these additional flamebaiting rants of your could have
>> on it...
>
>And you don't see the hypocrisy in that statement? Tad decided to 
>provoke an argument as if the universe depends on perfect typing, and 
>yet _I'm_ flamebaiting? And then you jumped in with your infinite wisdom 
>to defend him... and accuse ME of flamebaiting? Do you really not see 
>how backwards you are on this?

No, sorry. A limit of mine probably. Only I'm not *defending* him,
because he needs not to, and has nothing to be defended from. OTOH I
know I've received help and wisdom from him, and he's been courteous
and respectful in my regards, nothing of which I can say about you,
period.


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 17:59:37 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <rgd283p5gd36fpp8c6skhd8p93f4aq4mfg@4ax.com>

On Tue, 26 Jun 2007 08:21:31 -0700, "Clenna Lumina"
<savagebeaste@yahoo.com> wrote:

>Well, in Perl 5 isn't there an implicit 'main::' package? I realize it 
>may not be the same as this "magic package" you speak of, but still then 
>I think it would be better said that declaring C<my>'s (to borrow your 

No, by any means.

>style) at the "top" of the 'main' code body is really making a package 

Which style?

>level/scope variable, effectively making it a global to the perspective 
>to anything in the package?

Yes and no, they will be "global" in the loose sense. But they will be
different beasts:


  grappa:~ [17:58:08]$ cat foo.pl
  #/usr/bin/perl
  
  use strict;
  use warnings;
  
  my $foo='foo';
  { my $foo='bar' }
  print $foo, "\n";
  
  __END__
  grappa:~ [17:58:22]$ perl foo.pl
  foo
  grappa:~ [17:58:26]$ perl -lpi -e 's/my/our/' foo.pl
  grappa:~ [17:58:48]$ perl foo.pl
  "our" variable $foo redeclared at foo.pl line 7.
          (Did you mean "local" instead of "our"?)
  bar


Michele
-- 
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
 .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,


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

Date: Tue, 26 Jun 2007 09:36:01 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ectjnF37f23iU1@mid.individual.net>

Michele Dondi wrote:
> On Tue, 26 Jun 2007 07:56:50 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
> > > Nor do I what these additional flamebaiting rants of your could 
> > > have
> > > on it...
> >
> > And you don't see the hypocrisy in that statement? Tad decided to
> > provoke an argument as if the universe depends on perfect typing, 
> > and
> > yet _I'm_ flamebaiting? And then you jumped in with your infinite
> > wisdom to defend him... and accuse ME of flamebaiting? Do you really
> > not see how backwards you are on this?
>
> No, sorry. A limit of mine probably. Only I'm not *defending* him,
> because he needs not to, and has nothing to be defended from.

Um, yes you did. You basically came to his aid with your large but empty 
paragraph after he chose to lock phasers on me for simple error.

Message-ID: <3kg0831oq60fe57akojhd3g7ras7lnofrs@4ax.com>

You want to tell me this wasn't to help push Tab's agenda?

> OTOH I
> know I've received help and wisdom from him, and he's been courteous
> and respectful in my regards,

Again, he provoked the argument of my typing skills, I'd hardly call 
that "courteous and respectful", rather I'd describe it as attempting to 
pick a fight.

> nothing of which I can say about you, period.

Excuse me while I laugh hysterically a moment. How in the name of 
Socrates' oatmeal pudding did we go from typographical-error to me being 
anti "courteous and respectful"? Can YOU really say YOU & Tad have been 
"courteous and respectful" in your crusade against me?

Did I just walk through that wall-to-the-4th-dimension in that one 
episode of The Twilight Zone?


-- 
CL 




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

Date: Tue, 26 Jun 2007 09:39:46 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ectqoF305aluU1@mid.individual.net>

Michele Dondi wrote:
> On Mon, 25 Jun 2007 16:42:12 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
>>> (I included 2 of the most common ones in my reply above.)
>>
>> One of which was your own. Looking up through the thread I only
>> miss-spelled "soem", tell me how this some how translates into a
>> "persona-of-the-day" ?
>
> Actually:
>
>> seen soem regualars reepatedly tell people not to reinvent whats
>> already
>         ^^     ^       ^^                                      ^^
>         ^^     ^       ^^                                      ^^
>          1     2        3                                       4
>
> In one line...

So what? They are just typos. You still haven't answered how this 
translates into a "persona-of-the-day", you've just used common errors 
to try to illustrate a non-point and such idiotic slander is getting 
rather irritating, if not outright silly.

It's like the Salem witch trials all over again. I assure you, I'm flesh 
and blood.

-- 
CL




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

Date: Tue, 26 Jun 2007 09:57:27 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ecurtF38jabiU1@mid.individual.net>

Michele Dondi wrote:
> On Tue, 26 Jun 2007 08:21:31 -0700, "Clenna Lumina"
> <savagebeaste@yahoo.com> wrote:
>
>> Well, in Perl 5 isn't there an implicit 'main::' package? I realize
>> it may not be the same as this "magic package" you speak of, but
>> still then I think it would be better said that declaring C<my>'s
>> (to borrow your
>
> No, by any means.

I could sware there was, while else would:

   $ perl -le 'use strict; &somesub;'
   Undefined subroutine &main::somesub called at -e line 1.

vs

   $ perl -le 'use strict; package TEST; &somesub;'
   Undefined subroutine &TEST::somesub called at -e line 1.

Maybe I'm confusing two different things here but it appear as if there 
is a implicit main:: package, or am I missing something?

>> style) at the "top" of the 'main' code body is really making a
>> package
>
> Which style?

The (more proper?) way of writing 'my' and 'our' and such as you were, 
as C<my>, C<our>, etc.

>> level/scope variable, effectively making it a global to the
>> perspective to anything in the package?
>
> Yes and no, they will be "global" in the loose sense. But they will be
> different beasts:

Package scope then, perhaps?

>  grappa:~ [17:58:08]$ cat foo.pl
>  #/usr/bin/perl
>
>  use strict;
>  use warnings;
>
>  my $foo='foo';
>  { my $foo='bar' }
>  print $foo, "\n";
>
>  __END__
>  grappa:~ [17:58:22]$ perl foo.pl
>  foo
>  grappa:~ [17:58:26]$ perl -lpi -e 's/my/our/' foo.pl
>  grappa:~ [17:58:48]$ perl foo.pl
>  "our" variable $foo redeclared at foo.pl line 7.
>          (Did you mean "local" instead of "our"?)
>  bar

Ok yes that's a significant difference. When I said global to the 
package I was meaning in the conventional (c/c++), which I originally 
learned programming on. Thanks for pointing that out.

-- 
CL 




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

Date: Tue, 26 Jun 2007 10:31:00 -0700
From: "Clenna Lumina" <savagebeaste@yahoo.com>
Subject: Re: FAQ 1.6 What is perl6?
Message-Id: <5ed0qrF3887amU1@mid.individual.net>

[CC'ed to email]

Tad McClellan wrote:
> Clenna Lumina <savagebeaste@yahoo.com> wrote:
>> Tad McClellan wrote:
>>> Clenna Lumina <savagebeaste@yahoo.com> wrote:
>>>
>>>> I have
>>>> seen soem regualars reepatedly tell people not to reinvent whats
>>>> already good and working and accepted.
>>>
>>>
>>> Like acceptable spelling.
>>>
>>> If some famous Perl guy would of jsut implemented a spell-correcting
>                                    ^^^^
>>> 'bot, then things would of been a lot better around here...
>                     ^^^^^^^^
>>
>> How is this relevant?
>
>
> From when your name was Al MacHonahey:
>
>   Message-ID: <56184210.0209031038.3b40a9ef@posting.google.com>

Ok, having gone back and looked again, to see why you so desperately 
have it out for me, see I apparently missed this line when I examined 
that post the first time. I believe I see why you were so insistent.

   From: savagebea...@yahoo.com (Al MacHonahey)

This is a forgery. Assuming it is identical to my email address (google 
hides part of it) then this Al MacHonahey was posting with an address he 
did not own.

I've been using this email address for over 5 years as a public email 
address (rather than disclose my private address.)

Furthermore, I am only a recent participant in this news group, as I was 
into posting on UseNet before a few months ago, when I made the 
transition from mail-list to UseNet after I discovered the list was 
available there.

I hope this finally douses the flames. The firefighters have enough to 
worry about near South Lake Tahoe
(http://news.yahoo.com/s/ap/20070625/ap_on_re_us/wildfires)

-- 
CL 




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

Date: Tue, 26 Jun 2007 03:26:01 -0700
From:  jrpfinch <jrpfinch@gmail.com>
Subject: Forking and SSH connections
Message-Id: <1182853561.090692.42500@w5g2000hsg.googlegroups.com>

Dear gurus,

Please could somebody give me a hint as to why this script at the
bottom of this post does not work when I remove the nofork=>1 from
line 19?  When I remove it (i.e. the scheduler becomes a forking
scheduler), checkMsMessages works the first time, but the second time
I get an error:

bash-2.05# /opt/perl5.8.8/bin/perl distill2.pl
Scheduling started...
stdout is beatbox
Bad packet length 1879469963 at /opt/perl5.8.8/lib/site_perl/5.8.8/Net/
SSH/Perl/Packet.pm line 175

Ultimately I would like the scheduler to be forking because it will
have multiple entries all happening at similar times.  Any tips on how
to achieve this would be appreciated.  Setting up an SSH login every
time checkMsMessages is called would be expensive, so I would like to
avoid this.

Many thanks

Jon

use strict;
use warnings;
use Net::SSH::Perl;
use Schedule::Cron;
main();

sub main
{
   my $cron = new Schedule::Cron(\&dispatchDefault);
   my $conn;

   $conn = Net::SSH::Perl -> new ("10.xxx.xxx.xxx", protocol => 2);
   $conn->login("user","password");
   $cron->add_entry("* * * * * 30", { 'subroutine' =>
\&checkMsMessages,
                                             'arguments'  =>
                                             [$conn]});

   print "Scheduling started...\n";
   $cron->run(nofork=>1);
}

sub checkMsMessages
{
   my $currentConnRef = $_[0];
   my ($stdout, $stderr, $exit);

   ($stdout, $stderr, $exit) =
               $currentConnRef->cmd
               ('echo beatbox');
   chomp ($stdout);
   print "stdout is $stdout\n";
}
sub dispatchDefault
{
   print "ID:   ",shift,"\n";
   print "Args: ","@_","\n";
   die "Functionshould never be called."
}
__END__



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

Date: 26 Jun 2007 16:50:57 GMT
From: xhoster@gmail.com
Subject: Re: Forking and SSH connections
Message-Id: <20070626125059.510$4e@newsreader.com>

jrpfinch <jrpfinch@gmail.com> wrote:
> Dear gurus,
>
> Please could somebody give me a hint as to why this script at the
> bottom of this post does not work when I remove the nofork=>1 from
> line 19?  When I remove it (i.e. the scheduler becomes a forking
> scheduler), checkMsMessages works the first time, but the second time
> I get an error:

Complex protocols often don't work across forks, so this doesn't surprise
me.  One possible problem is that I think most SSH ciphers use CBC, which
means encrypted text of one block is used as part of the encryption of the
next block.  Since forked sibling processes don't share this state
information, they can't work properly.


>
> bash-2.05# /opt/perl5.8.8/bin/perl distill2.pl
> Scheduling started...
> stdout is beatbox
> Bad packet length 1879469963 at /opt/perl5.8.8/lib/site_perl/5.8.8/Net/
> SSH/Perl/Packet.pm line 175
>
> Ultimately I would like the scheduler to be forking because it will
> have multiple entries all happening at similar times.  Any tips on how
> to achieve this would be appreciated.  Setting up an SSH login every
> time checkMsMessages is called would be expensive, so I would like to
> avoid this.

It *might* be possible to hack away at SSH to get it to work, but I think a
better avenue would be either to just accept the cost of setting up SSH
login each time, or change the cron to invoke your routine 1/10 (or
whatever) as often and then have the process itself loop 10 times on the
same connection before closing it.

Xho

-- 
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service                        $9.95/Month 30GB


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

Date: Tue, 26 Jun 2007 07:36:57 -0700
From:  rogv24@yahoo.com
Subject: Re: gcc help
Message-Id: <1182868617.270376.150980@u2g2000hsc.googlegroups.com>

On Jun 25, 4:16 pm, "Asim Suter" <asu...@cisco.com> wrote:
> <rog...@yahoo.com> wrote in message
>
> news:1182801260.342589.195890@w5g2000hsg.googlegroups.com...
>
>
>
>
>
> > On Jun 25, 3:24 pm, "Asim Suter" <asu...@cisco.com> wrote:
> >> <rog...@yahoo.com> wrote in message
>
> >>news:1182799109.574291.145310@c77g2000hse.googlegroups.com...
>
> >> >I need to download gcc for a solaris server then recompile perl with
> >> > gcc.
> >> > I have never done this.  Can some one recommend a download website.
>
> >> Tryhttp://gcc.gnu.org/
> >> So far so good.
>
> >> > Once the module is downloaded
> >> > How do I recompile with perl.
>
> >> ??
> >> Can you explain what you want exactly ?
>
> >> Regards.
> >> Asim Suter
>
> > thanks for the website.  After I download gcc what needs to be done?
>
> There should be a README file and/or INSTALL file with the instructions.
>
> Regards.
> Asim Suter- Hide quoted text -
>
> - Show quoted text -

thank you



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

Date: Tue, 26 Jun 2007 01:09:06 -0700
From:  Ilias Lazaridis <ilias@lazaridis.com>
Subject: Re: How can I overload the build in array type?
Message-Id: <1182845346.746748.57210@c77g2000hse.googlegroups.com>

On Jun 26, 3:07 am, Michael Carman <mjcar...@mchsi.com> wrote:
> On 6/24/2007 9:41 PM, Ilias Lazaridis wrote:
>
> > On Jun 24, 6:14 pm, Michael Carman wrote:
>
> >> you could probably write a source filter
>
> > ok, thank you!
>
> > I assume the source filter would just replace the "[<construction
> > data>]" with "My::Array->new(<construction data>).
>
> > Thus a perl "source filter" is something like a "custom preprocessor"
> > or "custom macro".
>
> Yep.

ok

> > No problem, I could use such a construct (if no other is available).
>
> Nope. We're already invoking the deep magic here.

ok

> > Are there any technical(!) negative issues with "source filters" ?
>
> Do you mean aside from confusing the hell out of anyone trying to maintain your
[...] - (elaboration on organizational matters)

I understand that there are no technical issues.

 .

--
http://dev.lazaridis.com/lang/ticket/17



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

Date: Tue, 26 Jun 2007 17:38:13 -0000
From:  sv2021@gmail.com
Subject: How to replace the "\" in "C:\myrootr\folder" with "/" ?
Message-Id: <1182879493.083400.174080@m37g2000prh.googlegroups.com>

Hi,
Can someone help me. I know this should be easy but I coulnt get it
working.

I want to replace the "\" backslash character in a string e.g: my
$test = "C:\myroot\folder";  with forward slash "/"

This is what my snippet, which seems to be not doing anything....
$test =~ s|\|/|g;



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

Date: Tue, 26 Jun 2007 10:49:57 -0700
From: "Asim Suter" <asuter@cisco.com>
Subject: Re: How to replace the "\" in "C:\myrootr\folder" with "/" ?
Message-Id: <1182880197.202607@sj-nntpcache-2.cisco.com>


<sv2021@gmail.com> wrote in message 
news:1182879493.083400.174080@m37g2000prh.googlegroups.com...
> Hi,
> Can someone help me. I know this should be easy but I coulnt get it
> working.
>
> I want to replace the "\" backslash character in a string e.g: my
> $test = "C:\myroot\folder";  with forward slash "/"
>
> This is what my snippet, which seems to be not doing anything....
> $test =~ s|\|/|g;
>

Replace the \ by \\ in the substitution.

As \ has special special meaning - you need to "escape" it.

Regards.
Asim Suter 




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

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 V11 Issue 580
**************************************


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