Re: Hi

[Jenn G.]

Hi,

You may want Expect:
http://search.cpan.org/~rgiersig/Expect-1.21/Expect.pod


On Fri, Jul 10, 2009 at 3:00 PM, John Somoza wrote:
> I have a general perl question.
>
> I'm on OSX running a program from the command line. That program asks a
> series of questions, which I interactively answer.
>
> I would like to use perl to run the program (this part is not the problem)
> and answer the questions (this is the part I need help with). I have seen
> this type of thing done with a shell script (I think you can use the ECHO
> command in the bourne shell) but how would I do this in perl?
>
> Thanks,
>
> John
>

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: HI

[Jeff Peng]

2009/9/30 Jyoti :
> Thanks for reply Rajiv. Will go through.Also can you explain me what this
> error means:
> Odd number of elements in anonymous hash at
> /usr/lib/cgi-bin/websubroutine.pl line 18.

That may mean, you passed wrong arguments to the method in a class.
The method expects a hash, should have even number of elements.


>
> line 18 is as follows:
>
> print $q->header("text/html"),
>

Maybe you got wrong in other location.
This statement has no problem for me:

# perl -MCGI -e '$q=CGI->new;print $q->header("text/html")'
Content-Type: text/html; charset=ISO-8859-1


Jeff.

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: HI

[Jyoti]

Thanks Jeff

On Wed, Sep 30, 2009 at 4:40 AM, Jeff Peng  wrote:

> 2009/9/30 Jyoti :
> > Thanks for reply Rajiv. Will go through.Also can you explain me what this
> > error means:
> > Odd number of elements in anonymous hash at
> > /usr/lib/cgi-bin/websubroutine.pl line 18.
>
> That may mean, you passed wrong arguments to the method in a class.
> The method expects a hash, should have even number of elements.
>
>
> >
> > line 18 is as follows:
> >
> > print $q->header("text/html"),
> >
>
> Maybe you got wrong in other location.
> This statement has no problem for me:
>
> # perl -MCGI -e '$q=CGI->new;print $q->header("text/html")'
> Content-Type: text/html; charset=ISO-8859-1
>
>
> Jeff.
>

Re: hi

[Paul Johnson]

On Tue, Sep 13, 2011 at 07:00:42AM -0700, pradeep wrote:
> Hi,
> I do have a doubt ,
> Input:
> 1,2,3,4,5,6
> output:
> 1-2,3-4,5-6
> 1-2,3-5,4-6
> 1-2,3-6,4-5
> 
> 1-3,2-4,5-6
> 1-3,2-5,4-6
> 1-3,2-6,4-5
> 
> 1-4,2-3,5-6
> 1-4,2-5,3-6
> 1-4,2-6,3-5
> 
> 1-5,2-3,4-6
> 1-5,2-4,3-6
> 1-5,2-6,3-4
> 
> 1-6,2-3,4-5
> 1-6,2-4,3-5
> 1-6,2-5,3-4
> 
> Can anyone help me in this

Unlikely, unless you are a bit more specific about what you are trying to do.

And even then, it's hard to help you to improve your code if you don't show
it.

-- 
Paul Johnson - p...@pjcj.net
http://www.pjcj.net

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: hi

[Brandon McCaig]

On Tue, Sep 13, 2011 at 10:00 AM, pradeep  wrote:
> Can anyone help me in this

Of course we can!

#/usr/bin/perl

use strict;
use warnings;

my $input = <>;

chomp $input;

if($input eq '1,2,3,4,5,6')
{
print <<'EOF';
1-2,3-4,5-6
1-2,3-5,4-6
1-2,3-6,4-5

1-3,2-4,5-6
1-3,2-5,4-6
1-3,2-6,4-5

1-4,2-3,5-6
1-4,2-5,3-6
1-4,2-6,3-5

1-5,2-3,4-6
1-5,2-4,3-6
1-5,2-6,3-4

1-6,2-3,4-5
1-6,2-4,3-5
1-6,2-5,3-4
EOF
}

__END__

You're welcome. <_<

Regards,


-- 
Brandon McCaig  
V zrna gur orfg jvgu jung V fnl. Vg qbrfa'g nyjnlf fbhaq gung jnl.
Castopulence Software  

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: hi

[Brandon McCaig]

On Wed, Sep 14, 2011 at 12:35 PM, Brandon McCaig  wrote:
> #/usr/bin/perl

Silly me, I forgot the bang.

--- a Wed Sep 14 12:38:40 2011
+++ b Wed Sep 14 12:38:46 2011
@@ -1,4 +1,4 @@
-#/usr/bin/perl
+#!/usr/bin/perl

 use strict;
 use warnings;


-- 
Brandon McCaig  
V zrna gur orfg jvgu jung V fnl. Vg qbrfa'g nyjnlf fbhaq gung jnl.
Castopulence Software  

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: hi

[Francisco Rivas]

There is a pm called Math::Combinatorics (
http://search.cpan.org/~allenday/Math-Combinatorics-0.09/lib/Math/Combinatorics.pm
)

It is really helpful to get the combinations without repetition. Then you
just need to process the results to get the output you need, I mean with the
"," and "-".

I hope this can help you.

2011/9/14 Brandon McCaig 

> On Wed, Sep 14, 2011 at 12:35 PM, Brandon McCaig 
> wrote:
> > #/usr/bin/perl
>
> Silly me, I forgot the bang.
>
> --- a Wed Sep 14 12:38:40 2011
> +++ b Wed Sep 14 12:38:46 2011
> @@ -1,4 +1,4 @@
> -#/usr/bin/perl
> +#!/usr/bin/perl
>
>  use strict;
>  use warnings;
>
>
> --
> Brandon McCaig  
> V zrna gur orfg jvgu jung V fnl. Vg qbrfa'g nyjnlf fbhaq gung jnl.
> Castopulence Software  <
> bamcc...@castopulence.org>
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
>
>
>

Re: Hi

[David Precious]

On Fri, 11 Jan 2013 00:34:14 +0530
bhanu chaitanya abbaraju  wrote:

> Please help me how can I stop perl emails

"stop perl emails"?

Taking a guess that you mean you want to unsubscribe from this mailing
list, each post from the list contains the following header:

List-Unsubscribe: 

Drop a blank email to that email address, and it should do the trick.

Cheers

Dave P


-- 
David Precious ("bigpresh") 
http://www.preshweb.co.uk/ www.preshweb.co.uk/twitter
www.preshweb.co.uk/linkedinwww.preshweb.co.uk/facebook
www.preshweb.co.uk/cpanwww.preshweb.co.uk/github



-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

RE: Hi

[klamerus]

Since you clearly don't know how mailing lists work I'm afraid that's not
possible.

-Original Message-
From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com] 
Sent: Thursday, January 10, 2013 2:04 PM
To: beginners@perl.org
Subject: Hi

Please help me how can I stop perl emails

-- 
A.Bhanuchaitanya



-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

RE: Hi

[Lou Pereira]

I beg to differ regarding your comment.  I have been trying to be removed
from this list for over a year to no avail.  So, all knowledge one, how do
we remove ourselves from this mail list?



-Original Message-
From: klamerus [mailto:klame...@earthlink.net] 
Sent: Thursday, January 10, 2013 4:10 PM
To: 'bhanu chaitanya abbaraju'; beginners@perl.org
Subject: RE: Hi

Since you clearly don't know how mailing lists work I'm afraid that's not
possible.

-Original Message-
From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
Sent: Thursday, January 10, 2013 2:04 PM
To: beginners@perl.org
Subject: Hi

Please help me how can I stop perl emails

--
A.Bhanuchaitanya



-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/




-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Kristin Nielsen]

Lou -

Klamerus' frustration is not completely unwarranted. I answered that question 
in my reply to the list - did you read it? If not, there are three steps to 
take - fewer if you are successful.

1. Start an email from the account with which you subscribed to the list. You 
MUST send your unsubscribe request from the email address by which list mail is 
being rec'd.
2. Send a simple blank email from the account mentioned in step #1 to 
beginners-unsubscr...@perl.org
3. If you are not unsubscribed, please add in your requests for further help 
(as simply saying "it doesn't work" does not help people troubleshoot, as we 
all know too well):
a. the email - including headers - that you sent to 
beginners-unsubscr...@perl.org
b. any replies you may have rec'd from the list server, especially if 
they contain denials or errors.

There you go.

I am, &c.,

Kristin

P. S. I take quite to heart the belittling attitude found on so many tech 
lists. Bad attitude doesn't work from either direction, and yes, delivery 
matters. This is supposed to be a cooperative educational community, is it not? 
Sure, we should all RTFM, but some of us who have been forced to 
learn-or-get-laid-off simply lack the formal training to know which term to use 
in our search, or even to know which PERLDOC to read, have been shamed into 
silence by cruel responses.  I am far beyond that now, but I remember it well. 
Furthermore, this list contains quite a few for whom English is not a first 
language. I am grateful to everyone here for being on the list and helping 
those who come to it for assistance. We all get frustrated with simplistic or 
repetitive questions, and people who don't even try should be told to try 
first, but very little besides a bully's ego is helped by mean replies. No?

Thanks again, all of you, really.

On Jan 10, 2013, at 3:36 PM, "Lou Pereira"  wrote:

> I beg to differ regarding your comment.  I have been trying to be removed
> from this list for over a year to no avail.  So, all knowledge one, how do
> we remove ourselves from this mail list?
> 
> 
> 
> -Original Message-
> From: klamerus [mailto:klame...@earthlink.net] 
> Sent: Thursday, January 10, 2013 4:10 PM
> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
> Subject: RE: Hi
> 
> Since you clearly don't know how mailing lists work I'm afraid that's not
> possible.
> 
> -Original Message-
> From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
> Sent: Thursday, January 10, 2013 2:04 PM
> To: beginners@perl.org
> Subject: Hi
> 
> Please help me how can I stop perl emails
> 
> --
> A.Bhanuchaitanya
> 
> 
> 
> -- 
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
> 
> 
> 
> 
> -- 
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
> 



--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Shawn H Corey]

On Thu, 10 Jan 2013 18:36:07 -0500
"Lou Pereira"  wrote:

> I beg to differ regarding your comment.  I have been trying to be
> removed from this list for over a year to no avail.  So, all
> knowledge one, how do we remove ourselves from this mail list?

Send a email to: beginners-unsubscr...@perl.org

You will get a confirmation reply. Press "Reply" and "Send". You will
get a final message saying good-bye.

-- 
Don't stop where the ink does.
Shawn

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Feng He]

于 2013-1-11 7:57, Shawn H Corey 写道:

On Thu, 10 Jan 2013 18:36:07 -0500
"Lou Pereira"  wrote:


I beg to differ regarding your comment.  I have been trying to be
removed from this list for over a year to no avail.  So, all
knowledge one, how do we remove ourselves from this mail list?


Send a email to: beginners-unsubscr...@perl.org

You will get a confirmation reply. Press "Reply" and "Send". You will
get a final message saying good-bye.




every replying messages have the foot info which includes the 
unsubscribing way:


To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Shawn H Corey]

On Fri, 11 Jan 2013 09:46:20 +0800
Feng He  wrote:

> 于 2013-1-11 7:57, Shawn H Corey 写道:
> > On Thu, 10 Jan 2013 18:36:07 -0500
> > "Lou Pereira"  wrote:
> >
> >> I beg to differ regarding your comment.  I have been trying to be
> >> removed from this list for over a year to no avail.  So, all
> >> knowledge one, how do we remove ourselves from this mail list?
> >
> > Send a email to: beginners-unsubscr...@perl.org
> >
> > You will get a confirmation reply. Press "Reply" and "Send". You
> > will get a final message saying good-bye.
> >
> 
> 
> every replying messages have the foot info which includes the 
> unsubscribing way:
> 
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
> 

Yes but if you don't send the confirmation back, you don't get
unsubscribed.


-- 
Don't stop where the ink does.
Shawn

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

RE: Hi

[Lou Pereira]

For the past year I have exhausted all options of e-mail format to opt out,
including your recommendations to no avail.   I must say that over 10 years
I have been involved with different e-mail lists and tech groups, but never
had such as poor service as this group.  Any other ideas would be
appreciated?


Regards;

Lou Pereira
C: (973) 670-6821
mailto:louis.pere...@ptalc.com


-Original Message-
From: Kristin Nielsen [mailto:kris...@justkristin.com] 
Sent: Thursday, January 10, 2013 6:50 PM
To: Lou Pereira
Cc: beginners@perl.org
Subject: Re: Hi

Lou -

Klamerus' frustration is not completely unwarranted. I answered that
question in my reply to the list - did you read it? If not, there are three
steps to take - fewer if you are successful.

1. Start an email from the account with which you subscribed to the list.
You MUST send your unsubscribe request from the email address by which list
mail is being rec'd.
2. Send a simple blank email from the account mentioned in step #1 to
beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please add in
your requests for further help (as simply saying "it doesn't work" does not
help people troubleshoot, as we all know too well):
a. the email - including headers - that you sent to
beginners-unsubscr...@perl.org
b. any replies you may have rec'd from the list server, especially
if they contain denials or errors.

There you go.

I am, &c.,

Kristin

P. S. I take quite to heart the belittling attitude found on so many tech
lists. Bad attitude doesn't work from either direction, and yes, delivery
matters. This is supposed to be a cooperative educational community, is it
not? Sure, we should all RTFM, but some of us who have been forced to
learn-or-get-laid-off simply lack the formal training to know which term to
use in our search, or even to know which PERLDOC to read, have been shamed
into silence by cruel responses.  I am far beyond that now, but I remember
it well. Furthermore, this list contains quite a few for whom English is not
a first language. I am grateful to everyone here for being on the list and
helping those who come to it for assistance. We all get frustrated with
simplistic or repetitive questions, and people who don't even try should be
told to try first, but very little besides a bully's ego is helped by mean
replies. No?

Thanks again, all of you, really.

On Jan 10, 2013, at 3:36 PM, "Lou Pereira"  wrote:

> I beg to differ regarding your comment.  I have been trying to be 
> removed from this list for over a year to no avail.  So, all knowledge 
> one, how do we remove ourselves from this mail list?
> 
> 
> 
> -Original Message-
> From: klamerus [mailto:klame...@earthlink.net]
> Sent: Thursday, January 10, 2013 4:10 PM
> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
> Subject: RE: Hi
> 
> Since you clearly don't know how mailing lists work I'm afraid that's 
> not possible.
> 
> -Original Message-
> From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
> Sent: Thursday, January 10, 2013 2:04 PM
> To: beginners@perl.org
> Subject: Hi
> 
> Please help me how can I stop perl emails
> 
> --
> A.Bhanuchaitanya
> 
> 
> 
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional 
> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
> 
> 
> 
> 
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional 
> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
> 



--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
commands, e-mail: beginners-h...@perl.org http://learn.perl.org/




-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Hal Wigoda]

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
commands, e-mail: beginners-h...@perl.org http://learn.perl.org/





On Fri, Jan 11, 2013 at 5:23 AM, Lou Pereira  wrote:
> For the past year I have exhausted all options of e-mail format to opt out,
> including your recommendations to no avail.   I must say that over 10 years
> I have been involved with different e-mail lists and tech groups, but never
> had such as poor service as this group.  Any other ideas would be
> appreciated?
>
>
> Regards;
>
> Lou Pereira
> C: (973) 670-6821
> mailto:louis.pere...@ptalc.com
>
>
> -Original Message-
> From: Kristin Nielsen [mailto:kris...@justkristin.com]
> Sent: Thursday, January 10, 2013 6:50 PM
> To: Lou Pereira
> Cc: beginners@perl.org
> Subject: Re: Hi
>
> Lou -
>
> Klamerus' frustration is not completely unwarranted. I answered that
> question in my reply to the list - did you read it? If not, there are three
> steps to take - fewer if you are successful.
>
> 1. Start an email from the account with which you subscribed to the list.
> You MUST send your unsubscribe request from the email address by which list
> mail is being rec'd.
> 2. Send a simple blank email from the account mentioned in step #1 to
> beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please add in
> your requests for further help (as simply saying "it doesn't work" does not
> help people troubleshoot, as we all know too well):
> a. the email - including headers - that you sent to
> beginners-unsubscr...@perl.org
> b. any replies you may have rec'd from the list server, especially
> if they contain denials or errors.
>
> There you go.
>
> I am, &c.,
>
> Kristin
>
> P. S. I take quite to heart the belittling attitude found on so many tech
> lists. Bad attitude doesn't work from either direction, and yes, delivery
> matters. This is supposed to be a cooperative educational community, is it
> not? Sure, we should all RTFM, but some of us who have been forced to
> learn-or-get-laid-off simply lack the formal training to know which term to
> use in our search, or even to know which PERLDOC to read, have been shamed
> into silence by cruel responses.  I am far beyond that now, but I remember
> it well. Furthermore, this list contains quite a few for whom English is not
> a first language. I am grateful to everyone here for being on the list and
> helping those who come to it for assistance. We all get frustrated with
> simplistic or repetitive questions, and people who don't even try should be
> told to try first, but very little besides a bully's ego is helped by mean
> replies. No?
>
> Thanks again, all of you, really.
>
> On Jan 10, 2013, at 3:36 PM, "Lou Pereira"  wrote:
>
>> I beg to differ regarding your comment.  I have been trying to be
>> removed from this list for over a year to no avail.  So, all knowledge
>> one, how do we remove ourselves from this mail list?
>>
>>
>>
>> -Original Message-
>> From: klamerus [mailto:klame...@earthlink.net]
>> Sent: Thursday, January 10, 2013 4:10 PM
>> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
>> Subject: RE: Hi
>>
>> Since you clearly don't know how mailing lists work I'm afraid that's
>> not possible.
>>
>> -Original Message-
>> From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
>> Sent: Thursday, January 10, 2013 2:04 PM
>> To: beginners@perl.org
>> Subject: Hi
>>
>> Please help me how can I stop perl emails
>>
>> --
>> A.Bhanuchaitanya
>>
>>
>>
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
>> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
>>
>>
>>
>>
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
>> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
>>
>
>
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
>
>
>
>
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
>
>



-- 
-
Chicago
Hal Wigoda

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi

[Kristin Nielsen]

If you do not give data for troubleshooting, there is no good way to help. See 
step 3:

3. If you are not unsubscribed, please add in
your requests for further help (as simply saying "it doesn't work" does not
help people troubleshoot, as we all know too well):
   a. the email - including headers - that you sent to
beginners-unsubscr...@perl.org
   b. any replies you may have rec'd from the list server, especially
if they contain denials or errors.

I am, &c.
Kristin

Sent while galavanting.

On Jan 11, 2013, at 3:23 AM, "Lou Pereira"  wrote:

> For the past year I have exhausted all options of e-mail format to opt out,
> including your recommendations to no avail.   I must say that over 10 years
> I have been involved with different e-mail lists and tech groups, but never
> had such as poor service as this group.  Any other ideas would be
> appreciated?
> 
> 
> Regards;
> 
> Lou Pereira
> C: (973) 670-6821
> mailto:louis.pere...@ptalc.com
> 
> 
> -Original Message-
> From: Kristin Nielsen [mailto:kris...@justkristin.com] 
> Sent: Thursday, January 10, 2013 6:50 PM
> To: Lou Pereira
> Cc: beginners@perl.org
> Subject: Re: Hi
> 
> Lou -
> 
> Klamerus' frustration is not completely unwarranted. I answered that
> question in my reply to the list - did you read it? If not, there are three
> steps to take - fewer if you are successful.
> 
> 1. Start an email from the account with which you subscribed to the list.
> You MUST send your unsubscribe request from the email address by which list
> mail is being rec'd.
> 2. Send a simple blank email from the account mentioned in step #1 to
> beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please add in
> your requests for further help (as simply saying "it doesn't work" does not
> help people troubleshoot, as we all know too well):
>a. the email - including headers - that you sent to
> beginners-unsubscr...@perl.org
>b. any replies you may have rec'd from the list server, especially
> if they contain denials or errors.
> 
> There you go.
> 
> I am, &c.,
> 
> Kristin
> 
> P. S. I take quite to heart the belittling attitude found on so many tech
> lists. Bad attitude doesn't work from either direction, and yes, delivery
> matters. This is supposed to be a cooperative educational community, is it
> not? Sure, we should all RTFM, but some of us who have been forced to
> learn-or-get-laid-off simply lack the formal training to know which term to
> use in our search, or even to know which PERLDOC to read, have been shamed
> into silence by cruel responses.  I am far beyond that now, but I remember
> it well. Furthermore, this list contains quite a few for whom English is not
> a first language. I am grateful to everyone here for being on the list and
> helping those who come to it for assistance. We all get frustrated with
> simplistic or repetitive questions, and people who don't even try should be
> told to try first, but very little besides a bully's ego is helped by mean
> replies. No?
> 
> Thanks again, all of you, really.
> 
> On Jan 10, 2013, at 3:36 PM, "Lou Pereira"  wrote:
> 
>> I beg to differ regarding your comment.  I have been trying to be 
>> removed from this list for over a year to no avail.  So, all knowledge 
>> one, how do we remove ourselves from this mail list?
>> 
>> 
>> 
>> -Original Message-
>> From: klamerus [mailto:klame...@earthlink.net]
>> Sent: Thursday, January 10, 2013 4:10 PM
>> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
>> Subject: RE: Hi
>> 
>> Since you clearly don't know how mailing lists work I'm afraid that's 
>> not possible.
>> 
>> -Original Message-
>> From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
>> Sent: Thursday, January 10, 2013 2:04 PM
>> To: beginners@perl.org
>> Subject: Hi
>> 
>> Please help me how can I stop perl emails
>> 
>> --
>> A.Bhanuchaitanya
>> 
>> 
>> 
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional 
>> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
>> 
>> 
>> 
>> 
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional 
>> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
> 
> 
> 
> --
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional
> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
> 
> 
> 
> 
> -- 
> To unsubscribe, e-mail: beginners-unsubscr...@perl.org
> For additional commands, e-mail: beginners-h...@perl.org
> http://learn.perl.org/
> 

RE: Hi

[Lou Pereira]

OK, So I performed you step 3 again last Thursday, but I am still receiving
e-mails??? Any more suggestions?


Regards;

Lou Pereira
C: (973) 670-6821
mailto:louis.pere...@ptalc.com

-Original Message-
From: Kristin Nielsen [mailto:justkris...@gmail.com] On Behalf Of Kristin
Nielsen
Sent: Friday, January 11, 2013 9:14 AM
To: Lou Pereira
Cc: 
Subject: Re: Hi

If you do not give data for troubleshooting, there is no good way to help.
See step 3:

3. If you are not unsubscribed, please add in your requests for further help
(as simply saying "it doesn't work" does not help people troubleshoot, as we
all know too well):
   a. the email - including headers - that you sent to
beginners-unsubscr...@perl.org
   b. any replies you may have rec'd from the list server, especially if
they contain denials or errors.

I am, &c.
Kristin

Sent while galavanting.

On Jan 11, 2013, at 3:23 AM, "Lou Pereira"  wrote:

> For the past year I have exhausted all options of e-mail format to opt
out,
> including your recommendations to no avail.   I must say that over 10
years
> I have been involved with different e-mail lists and tech groups, but 
> never had such as poor service as this group.  Any other ideas would 
> be appreciated?
> 
> 
> Regards;
> 
> Lou Pereira
> C: (973) 670-6821
> mailto:louis.pere...@ptalc.com
> 
> 
> -Original Message-
> From: Kristin Nielsen [mailto:kris...@justkristin.com]
> Sent: Thursday, January 10, 2013 6:50 PM
> To: Lou Pereira
> Cc: beginners@perl.org
> Subject: Re: Hi
> 
> Lou -
> 
> Klamerus' frustration is not completely unwarranted. I answered that 
> question in my reply to the list - did you read it? If not, there are 
> three steps to take - fewer if you are successful.
> 
> 1. Start an email from the account with which you subscribed to the list.
> You MUST send your unsubscribe request from the email address by which 
> list mail is being rec'd.
> 2. Send a simple blank email from the account mentioned in step #1 to 
> beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please 
> add in your requests for further help (as simply saying "it doesn't 
> work" does not help people troubleshoot, as we all know too well):
>a. the email - including headers - that you sent to 
> beginners-unsubscr...@perl.org
>b. any replies you may have rec'd from the list server, especially 
> if they contain denials or errors.
> 
> There you go.
> 
> I am, &c.,
> 
> Kristin
> 
> P. S. I take quite to heart the belittling attitude found on so many 
> tech lists. Bad attitude doesn't work from either direction, and yes, 
> delivery matters. This is supposed to be a cooperative educational 
> community, is it not? Sure, we should all RTFM, but some of us who 
> have been forced to learn-or-get-laid-off simply lack the formal 
> training to know which term to use in our search, or even to know 
> which PERLDOC to read, have been shamed into silence by cruel 
> responses.  I am far beyond that now, but I remember it well. 
> Furthermore, this list contains quite a few for whom English is not a 
> first language. I am grateful to everyone here for being on the list 
> and helping those who come to it for assistance. We all get frustrated 
> with simplistic or repetitive questions, and people who don't even try 
> should be told to try first, but very little besides a bully's ego is
helped by mean replies. No?
> 
> Thanks again, all of you, really.
> 
> On Jan 10, 2013, at 3:36 PM, "Lou Pereira" 
wrote:
> 
>> I beg to differ regarding your comment.  I have been trying to be 
>> removed from this list for over a year to no avail.  So, all 
>> knowledge one, how do we remove ourselves from this mail list?
>> 
>> 
>> 
>> -Original Message-
>> From: klamerus [mailto:klame...@earthlink.net]
>> Sent: Thursday, January 10, 2013 4:10 PM
>> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
>> Subject: RE: Hi
>> 
>> Since you clearly don't know how mailing lists work I'm afraid that's 
>> not possible.
>> 
>> -Original Message-
>> From: bhanu chaitanya abbaraju [mailto:bhanu.cha...@gmail.com]
>> Sent: Thursday, January 10, 2013 2:04 PM
>> To: beginners@perl.org
>> Subject: Hi
>> 
>> Please help me how can I stop perl emails
>> 
>> --
>> A.Bhanuchaitanya
>> 
>> 
>> 
>> --
>> To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional 
>> commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
>> 
>> 
>> 
>> 
>> --
>> To unsubscribe, 

Re: Hi

[Torqued]

Regards... /omps

On 14-Jan-2013, at 11:12 PM, "Lou Pereira"  wrote:

> OK, So I performed you step 3 again last Thursday, but I am still receiving
> e-mails??? Any more suggestions?
> 
May be the group doesn't want you to leave. ;)

> Regards;
> 
> Lou Pereira
> C: (973) 670-6821
> mailto:louis.pere...@ptalc.com
> 
> -Original Message-
> From: Kristin Nielsen [mailto:justkris...@gmail.com] On Behalf Of Kristin
> Nielsen
> Sent: Friday, January 11, 2013 9:14 AM
> To: Lou Pereira
> Cc: 
> Subject: Re: Hi
> 
> If you do not give data for troubleshooting, there is no good way to help.
> See step 3:
> 
> 3. If you are not unsubscribed, please add in your requests for further help
> (as simply saying "it doesn't work" does not help people troubleshoot, as we
> all know too well):
>   a. the email - including headers - that you sent to
> beginners-unsubscr...@perl.org
>   b. any replies you may have rec'd from the list server, especially if
> they contain denials or errors.
> 
> I am, &c.
> Kristin
> 
> Sent while galavanting.
> 
> On Jan 11, 2013, at 3:23 AM, "Lou Pereira"  wrote:
> 
>> For the past year I have exhausted all options of e-mail format to opt
> out,
>> including your recommendations to no avail.   I must say that over 10
> years
>> I have been involved with different e-mail lists and tech groups, but 
>> never had such as poor service as this group.  Any other ideas would 
>> be appreciated?
>> 
>> 
>> Regards;
>> 
>> Lou Pereira
>> C: (973) 670-6821
>> mailto:louis.pere...@ptalc.com
>> 
>> 
>> -Original Message-
>> From: Kristin Nielsen [mailto:kris...@justkristin.com]
>> Sent: Thursday, January 10, 2013 6:50 PM
>> To: Lou Pereira
>> Cc: beginners@perl.org
>> Subject: Re: Hi
>> 
>> Lou -
>> 
>> Klamerus' frustration is not completely unwarranted. I answered that 
>> question in my reply to the list - did you read it? If not, there are 
>> three steps to take - fewer if you are successful.
>> 
>> 1. Start an email from the account with which you subscribed to the list.
>> You MUST send your unsubscribe request from the email address by which 
>> list mail is being rec'd.
>> 2. Send a simple blank email from the account mentioned in step #1 to 
>> beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please 
>> add in your requests for further help (as simply saying "it doesn't 
>> work" does not help people troubleshoot, as we all know too well):
>>   a. the email - including headers - that you sent to 
>> beginners-unsubscr...@perl.org
>>   b. any replies you may have rec'd from the list server, especially 
>> if they contain denials or errors.
>> 
>> There you go.
>> 
>> I am, &c.,
>> 
>> Kristin
>> 
>> P. S. I take quite to heart the belittling attitude found on so many 
>> tech lists. Bad attitude doesn't work from either direction, and yes, 
>> delivery matters. This is supposed to be a cooperative educational 
>> community, is it not? Sure, we should all RTFM, but some of us who 
>> have been forced to learn-or-get-laid-off simply lack the formal 
>> training to know which term to use in our search, or even to know 
>> which PERLDOC to read, have been shamed into silence by cruel 
>> responses.  I am far beyond that now, but I remember it well. 
>> Furthermore, this list contains quite a few for whom English is not a 
>> first language. I am grateful to everyone here for being on the list 
>> and helping those who come to it for assistance. We all get frustrated 
>> with simplistic or repetitive questions, and people who don't even try 
>> should be told to try first, but very little besides a bully's ego is
> helped by mean replies. No?
>> 
>> Thanks again, all of you, really.
>> 
>> On Jan 10, 2013, at 3:36 PM, "Lou Pereira" 
> wrote:
>> 
>>> I beg to differ regarding your comment.  I have been trying to be 
>>> removed from this list for over a year to no avail.  So, all 
>>> knowledge one, how do we remove ourselves from this mail list?
>>> 
>>> 
>>> 
>>> -Original Message-
>>> From: klamerus [mailto:klame...@earthlink.net]
>>> Sent: Thursday, January 10, 2013 4:10 PM
>>> To: 'bhanu chaitanya abbaraju'; beginners@perl.org
>>> Subject: RE: Hi
>>> 
>>> Since you clearly don't know how mailing lists work I'm afraid that'

Re: Hi

[Bill Stephenson]

Hi Lou,

You might want to make sure you're sending your email in plain text. 

Check your settings, if you're using "Rich Text" or "HTML" to format the email 
it might screw the pooch for you. That's a real old problem, but this might be 
real old software running this list.

Also, I found this on the faq page for this list:

Who owns this list? Who do I complain to?
John SJ Anderson owns the beginners list. You can contact him at 
geneh...@genehack.org.

http://learn.perl.org/faq/beginners.html#owner

Hopefully contacting them will help. If not, let us all know and I'll try and 
help you track down a solution to the problem.

Kindest Regards,

Bill Stephenson



--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

RE: Hi

[Lou Pereira]

WOW!! I think it worked, I just received an e-mail confirming the removal of
my e-mail!!   Good by everyone :)


Regards;



-Original Message-
From: Torqued [mailto:torque.in...@gmail.com] 
Sent: Monday, January 14, 2013 8:45 PM
To: Lou Pereira
Cc: Kristin Nielsen; 
Subject: Re: Hi



Regards... /omps

On 14-Jan-2013, at 11:12 PM, "Lou Pereira"  wrote:

> OK, So I performed you step 3 again last Thursday, but I am still 
> receiving e-mails??? Any more suggestions?
> 
May be the group doesn't want you to leave. ;)

> Regards;
> 
> Lou Pereira
> C: (973) 670-6821
> mailto:louis.pere...@ptalc.com
> 
> -Original Message-
> From: Kristin Nielsen [mailto:justkris...@gmail.com] On Behalf Of 
> Kristin Nielsen
> Sent: Friday, January 11, 2013 9:14 AM
> To: Lou Pereira
> Cc: 
> Subject: Re: Hi
> 
> If you do not give data for troubleshooting, there is no good way to help.
> See step 3:
> 
> 3. If you are not unsubscribed, please add in your requests for 
> further help (as simply saying "it doesn't work" does not help people 
> troubleshoot, as we all know too well):
>   a. the email - including headers - that you sent to 
> beginners-unsubscr...@perl.org
>   b. any replies you may have rec'd from the list server, especially 
> if they contain denials or errors.
> 
> I am, &c.
> Kristin
> 
> Sent while galavanting.
> 
> On Jan 11, 2013, at 3:23 AM, "Lou Pereira" 
wrote:
> 
>> For the past year I have exhausted all options of e-mail format to 
>> opt
> out,
>> including your recommendations to no avail.   I must say that over 10
> years
>> I have been involved with different e-mail lists and tech groups, but 
>> never had such as poor service as this group.  Any other ideas would 
>> be appreciated?
>> 
>> 
>> Regards;
>> 
>> Lou Pereira
>> C: (973) 670-6821
>> mailto:louis.pere...@ptalc.com
>> 
>> 
>> -Original Message-
>> From: Kristin Nielsen [mailto:kris...@justkristin.com]
>> Sent: Thursday, January 10, 2013 6:50 PM
>> To: Lou Pereira
>> Cc: beginners@perl.org
>> Subject: Re: Hi
>> 
>> Lou -
>> 
>> Klamerus' frustration is not completely unwarranted. I answered that 
>> question in my reply to the list - did you read it? If not, there are 
>> three steps to take - fewer if you are successful.
>> 
>> 1. Start an email from the account with which you subscribed to the list.
>> You MUST send your unsubscribe request from the email address by 
>> which list mail is being rec'd.
>> 2. Send a simple blank email from the account mentioned in step #1 to 
>> beginners-unsubscr...@perl.org 3. If you are not unsubscribed, please 
>> add in your requests for further help (as simply saying "it doesn't 
>> work" does not help people troubleshoot, as we all know too well):
>>   a. the email - including headers - that you sent to 
>> beginners-unsubscr...@perl.org
>>   b. any replies you may have rec'd from the list server, especially 
>> if they contain denials or errors.
>> 
>> There you go.
>> 
>> I am, &c.,
>> 
>> Kristin
>> 
>> P. S. I take quite to heart the belittling attitude found on so many 
>> tech lists. Bad attitude doesn't work from either direction, and yes, 
>> delivery matters. This is supposed to be a cooperative educational 
>> community, is it not? Sure, we should all RTFM, but some of us who 
>> have been forced to learn-or-get-laid-off simply lack the formal 
>> training to know which term to use in our search, or even to know 
>> which PERLDOC to read, have been shamed into silence by cruel 
>> responses.  I am far beyond that now, but I remember it well.
>> Furthermore, this list contains quite a few for whom English is not a 
>> first language. I am grateful to everyone here for being on the list 
>> and helping those who come to it for assistance. We all get 
>> frustrated with simplistic or repetitive questions, and people who 
>> don't even try should be told to try first, but very little besides a 
>> bully's ego is
> helped by mean replies. No?
>> 
>> Thanks again, all of you, really.
>> 
>> On Jan 10, 2013, at 3:36 PM, "Lou Pereira" 
> wrote:
>> 
>>> I beg to differ regarding your comment.  I have been trying to be 
>>> removed from this list for over a year to no avail.  So, all 
>>> knowledge one, how do we remove ourselves from this mail list?
>>> 
>>> 
>>> 
>>> -Original Message-
>>

RE: hi

[Thomas Bätzler]

 
ZHAO, BING <[EMAIL PROTECTED]> asked:
>  How do you INPUT the output( of a file) to the 
> designated file? To be specific, if the file being output 
> generates a score/number which needs to be subsequently input 
> into another file, how to you set up the output and input?
>  Thannks a lot.

I'm not entirely sure I understood your question, but most
likely you're looking for a "pipe open", i.e.

if( open( OUT, '|/some/command' ) ){
print OUT "text is send to command";
} else {
  die "open failed: $!"
}

This is a complicated subject that is best explained by the
perlipc and perlopen manual pages.

HTH,
Thomas


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: hi

[Xavier Noria]

On Sep 26, 2005, at 22:20, ZHAO, BING wrote:


Hi,
How do you INPUT the output( of a file) to the  
designated file? To be specific, if the file being output generates  
a score/number which needs to be subsequently input into another  
file, how to you set up the output and input?


Let me try to reword it.

Do you have a Perl script that prints something to stdout and you  
want to redirect that output to some archive on disk instead of the  
console? If that's a right interpretation, do you want to do it from  
within the script or from the shell prompt?


-- fxn

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi

[Timothy Johnson]

You need to declare each variable (scalar, array, or hash) with my
before you use them.  This lets Perl know what scope they should have.

Example:

my @shrimp;

foreach(@shrimp){
   my $prawn = 1;
   do something...
}

-Original Message-
From: ZHAO, BING [mailto:[EMAIL PROTECTED] 
Sent: Monday, October 10, 2005 3:35 PM
To: Perl Beginners List
Subject: hi

Hi,
   I am doing this simple enough script, but somehow it
generates error:



Global symbol "@shrimp" requires explicit package name at
./pdbReadbrk2000.pl line 19.
syntax error at ./pdbReadbrk2000.pl line 21, near "foreach @shrimp"
Global symbol "$to" requires explicit package name at
./pdbReadbrk2000.pl line 21.






--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: hi

[Randal L. Schwartz]

> "Bing" == Bing Zhao <[EMAIL PROTECTED]> writes:

Bing>  system "\rm dali.lock"; #ignore this part

But I can't.  Why do you want to run a program named CR-m?
As in \x0Am.  As in, "return" followed by "m".

That's what "\rm" means.

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
 http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi

[Charles K. Clarkson]

ZHAO, BING  wrote:

:  I am doing this simple enough script, but somehow
: it generates error:
:
: open COO, "1898.inf" or die "Cannot open file 1898.inf:$!";
: @shrimp=;
:
: foreach @shrimp{
:  $squid=substr($_,0,4);
:  $shark=$_.".pdb";
:
: Global symbol "@shrimp" requires explicit package name at
: ./pdbReadbrk2000.pl line 19.

Declare your variables in the smallest scope possible.
Read http://perl.plover.com/FAQs/Namespaces.html

my @shrimp = ;

Since you are probably finished with the file now, it is a
good time to close it.

my @shrimp = ;
close COO;

Without knowing more about your data, I would probably chomp
the line endings too.

chomp( my @shrimp =  );
close COO;



: syntax error at ./pdbReadbrk2000.pl line 21, near
: "foreach @shrimp"

The list or array goes in parenthesis.

foreach ( @shrimp ) {

Or, more likely:

foreach ( @shrimp ) {
my $squid = substr( $_, 0, 4 );
my $shark = "$_.pdb";


: Global symbol "$to" requires explicit package name at
: ./pdbReadbrk2000.pl line 21.

This error did not originate from the given code. This happens
a lot when you are trying to debug and write a message at the same
time. Get a good programmer's editor. It will allow you to quickly
test code and cut and paste errors just before you post it to the
group.



Add the following to the top of your script. It will give you
more detailed error messages.

use diagnostics;


HTH,

Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: hi

[Suvajit Sengupta]

Hi,
Can you post the whole script. Possibly you have declared 'use strict' 
in your code or it has been set default.
The problem is that the compiler is demanding explicit declaration of 
the variables that you have used.

declaring @shrimp as :
my @shrimp = ;
and
foreach my $tuna (@shrimp)
{
   squid=substr($tuna,0,4);
   ...and so on
}

will eliminate the error.

Regards,
Suvajit


ZHAO, BING wrote:


Hi,
  I am doing this simple enough script, but somehow it 
generates error:




open COO, "1898.inf" or die "Cannot open file 1898.inf:$!";
@shrimp=;

foreach @shrimp{
$squid=substr($_,0,4);
$shark=$_.".pdb";
system "\rm dali.lock"; #ignore this part
system "dalilite ~readbrk pdb1898/$shark $squid"; #ignore this part
}


Global symbol "@shrimp" requires explicit package name at 
./pdbReadbrk2000.pl line 19.

syntax error at ./pdbReadbrk2000.pl line 21, near "foreach @shrimp"
Global symbol "$to" requires explicit package name at 
./pdbReadbrk2000.pl line 21.



thank you all, what did I do wrong?

best,



--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi

[Timothy Johnson]

Please respond to the list.  I'm not always available to answer
questions.

Now for your questions, loosely numbered:

1,3) You probably either included "use strict" or perhaps included some
other code that used strict.  That enforces the requirement to lexically
scope your variables, among other things.  

2) Lexically scoping your variables does not affect your ability to use
your variables at all.  It just means that they automatically get
created at the 'my' statement and destroyed at the end of the code
block.  If you do need a variable to exist throughout the entire script,
you can declare it at the top of your script or use 'our' instead of
'my'.

And finally, the question you didn't ask, but I'll answer anyway. I
would seriously recommend adding 'use strict' and 'use warnings' in all
of your scripts.  It can be a real pain at first when you're not used to
using it, but it can save you a lot of time in the long run.  Keep an
eye on the list and you can get a lot of good examples.  This question
comes up a lot with people who are self-taught.  I had to go back and
learn to use strict after coding for about a year, and I really wish I
had started sooner.




A few examples of how adding 'use strict' can possibly save you time:


1.  You're looping through an array, using a variable inside the loop.
Something fails and the variable doesn't get updated.  You don't realize
until hours later that all of your output is worthless because half of
the loops were just repeating the same value as the loop before it.

By declaring the variable using 'my' inside the loop, you can avoid this
because the variable will be automatically reinitialized each time.


2.  You can't figure out why your program isn't generating the expected
output.  You spend an hour putting debug statements throughout your
script, only to find that you misspelled the name of the variable in
your print statement.  Perl was happy to oblige you by creating a new,
empty variable with that name and printing it for you.

By adding 'use strict' to the top of your script, you can avoid this
because Perl will complain about the variable not being declared.


Check out 'perldoc strict' for more detailed info.




-Original Message-
From: ZHAO, BING [mailto:[EMAIL PROTECTED] 
Sent: Monday, October 10, 2005 4:20 PM
To: Timothy Johnson
Subject: Re: hi

why do I need to specify $,%,@ using 'my', sometime I do need them to be
global so that I can use 
their property, like scalar @shrimp to get a #,
and I have beening programming for a while, and I seldom use my, and
this is the 1st time unix has 
generated such kind of warning, why?

thank you very much.

bing


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: Hi

[Ron Smith]

--- Kaushal Shriyan <[EMAIL PROTECTED]> wrote:

> Hi All
> 
> I am a novice to perl,I would like to learn perl in
> a systematic way,
> Whats the best way to start with,I dont have any
> experience of
> programming Language, But I came to know that perl
> is a Good
> Programming Language

Try Learning Perl, Fourth Edition (Paperback) by
Randal L. Schwartz, Tom Phoenix, brian d foy. Here's
one of many links:

http://www.amazon.com/gp/product/0596101058/sr=8-2/qid=1147704150/ref=pd_bbs_2/103-0184362-2216600?%5Fencoding=UTF8

Ron Smith
> 
> Thanks
> 
> Kaushal
> 
> --
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> 
> 
> 
> 
> 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi

[Leonid Grinberg]

I am a novice to perl,I would like to learn perl in a systematic way,
Whats the best way to start with,I dont have any experience of
programming Language, But I came to know that perl is a Good
Programming Language


Whether or not you do choose to use a book or not, remember: always
try doing some excersizes. You *cannot* just read, you have to try it
firsthand. This is as simple as writing your first program that just
prints out ``Hello World'' to testing out the ugliest regular
expressions (you will eventually learn what these are). Remember, you
are just learning, and so you are free to experiment.

Good Luck!

--
Leonid Grinberg
[EMAIL PROTECTED]
http://www.lgrinberg.org

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi

[Kipp, James]

declare %flavors, ie my %flavors. this is what use strict is for.  read up
on scoping

> -Original Message-
> From: Mark Schouten [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, September 26, 2002 11:47 AM
> To: [EMAIL PROTECTED]
> Subject: Hi
> 
> 
> Hi,
> 
> I'm a complete newbie, so have some patience. :)
> 
> Im walking through the book 'Learning Perl' by O'Reilly and 
> I'm allready
> in a small problem.
> 
> I'm trying to compile the following:
> 
> 
> #!/usr/bin/perl -w
> ## cgi-bin/ice_cream: program to answer and generate ice cream
> ## order form (version 4)
> use strict; # enforce variable declarations and quoting
> use CGI qw(:standard);
> 
> print header, start_html("Ice Cream Stand"), h1("Ice Cream Stand");
> if (param()) { # the form has already been filled out
>   my $who = param("name");
>   my $flavor = param("flavor");
>   my $scoops = param("scoops");
>   my $taxrate = 1.0743;
>   my $cost = sprintf("%.2f", $taxrate * (1.00 + $scoops * 0.25));
>   print p("Ok, $who, have $scoops scoops of $flavor for \$$cost.");
> } else { # first time through, so present clean form
>   print hr(); # draw a horizontal rule before the form
>   print start_form();
>   print p("What's your name? ", textfield("name"));
>   # FOR EXPLANATION OF FOLLOWING TWO LINES, SEE NEXT SECTION
>   print p("What flavor: ", popup_menu("flavor",
> ['mint','cherry','mocha']));
>   print p("How many scoops? ", popup_menu("scoops", [ 1..3 ]));
> 
> ##Problem started here
> 
>   %flavors = (
> mint=> "Mighty Mint",
> chocolate   => "Cherished Chocolate",
> cherry  => "Cheery Cherry",
> vanilla => "Very Vanilla",
> peach   => "Perfectly Peachy",
>   );
>   print scrolling_list(
> -NAME   => "flavors",
> -LABELS => \%flavors,
> -VALUES => [ keys %flavors ],
> -SIZE   => 3,
> -MULTIPLE   => 0, # 1 for true, 0 for false
>   );
> 
> ##End of problem
> 
>   print p(submit("order"), reset("clear"));
>   print end_form(), hr();
> }
> print end_html;
> 
> (Indeed, it is the example program. :))
> 
> It all worked fine untill I pasted the ## Problem part ##. In 
> my logs I
> see the following message:
> 
> 
> Global symbol "%flavors" requires explicit package name at 
> dhcptest.cgi
> line 22.
> Global symbol "%flavors" requires explicit package name at 
> dhcptest.cgi
> line 31.
> Global symbol "%flavors" requires explicit package name at 
> dhcptest.cgi
> line 32.
> 
> 
>
> 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: Hi

[Mark Schouten]

On Thu, Sep 26, 2002 at 12:11:26PM -0400, Kipp, James wrote:
> declare %flavors, ie my %flavors. this is what use strict is for.  read up
> on scoping

That's it indeed. Thanks!

Mark


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

RE: Hi

[Kipp, James]

the important thing is understanding why this is the case.  a good read for
you is 'perldoc perlsub'


> -Original Message-
> From: Mark Schouten [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, September 26, 2002 12:17 PM
> To: Kipp, James
> Cc: [EMAIL PROTECTED]
> Subject: Re: Hi
> 
> 
> On Thu, Sep 26, 2002 at 12:11:26PM -0400, Kipp, James wrote:
> > declare %flavors, ie my %flavors. this is what use strict 
> is for.  read up
> > on scoping
> 
> That's it indeed. Thanks!
> 
> Mark
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 
> 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: Hi

[david]

Mark Schouten wrote:

> 
>   %flavors = (

change the above to:

my %flavors = (

and try again.

read the Perl book's scope section again :-)

david

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: hi..

[Rob Dixon]

Ajey Kulkarni wrote:
>
> happy new year to all,..
> i've a qn.,:)
> i want to 'insert' an escape character for every '[' & ']'
> i will find in a variable..
> Suppose $temp has a word which might contain [ and/or ].
> Eg: if $temp has hello]
> the modified temp should have hello\]
>
> if $value  has [hello] i want the result to be \[hello\].
>
> Is there a quick one line regex to do this?
> i'm able to match the presence of [ & ]
> if( (/\[/)|(/\]/) ){
>  my $value = $_;
>  $value =~ s/\[/\\\[/;
>  $value =~ s/\]/\\\]/;
>  print $value;
>
> }
> Kinda doing the stuff,but i just checkign out a 1 liner reg-ex.

Won't a two-liner do? You've already written it if so, except
that square brackets in the replacement string don't need
escaping; a one-liner is possible but much less efficient. Also
you don't need the 'if'. Does the code below help? I've also
changed the s/// delimiters to brackets to avoid the mess that
the slashes and backslashes make.

  my $value = '[hello]';

  for ($value) {
s(\[)(\\[)g;
s(\])(\\])g;
  }

  print $value, "\n";

**OUTPUT

  \[hello\]

Alternatively, if it's OK to escape all non-alphanumeric characters
then 'quotemeta' is what you want.

  my $value = '[hello]';
  $value = quotemeta $value;
  print $value, "\n";

**OUTPUT

  \[hello\]


Cheers,

Rob



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi..

[Charles K. Clarkson]

Ajey Kulkarni <[EMAIL PROTECTED]> wrote:

: Subject: hi..


Great subject. So much better than "Need help with regex"
or "Need to escape []". Always keep us guessing.


: i want to 'insert' an escape character for every '[' & ']' 
: i will find in a variable..
:
: Suppose $temp has a word which might contain [ and/or ].
: Eg: if $temp has hello]
: the modified temp should have hello\]
: 
: if $value  has [hello] i want the result to be \[hello\]. 
: 
: Is there a quick one line regex to do this?
: i'm able to match the presence of [ & ]
: if( (/\[/)|(/\]/) ){
:  my $value = $_;
:  $value =~ s/\[/\\\[/;
:  $value =~ s/\]/\\\]/;
:  print $value;
: }

A one-liner is not necessarily better. You might want
to test. The substitution operator has a pattern on the
left side and a replacement string on the other. According
to 'perlop' it takes this form:

  s/PATTERN/REPLACEMENT/egimosx


Let's take a look at your phrase:

s/\[/\\\[/


The PATTERN is '\[' and the REPLACEMENT is "\\\[". I
put the REPLACEMENT in double quotes because that is how
it is most commonly interpolated. To print '\[' we need
"\\[" on the REPLACEMENT side.


The PATTERN side views '[', and ']' as special
characters. So we need to escape them or we need to use
some other means to describe them. To look for more than
one we can place them in a character class: [\[\]] or as
[\][] then capture the one we match: ([\][]).

  s/([\][])/\\$1/

We could also avoid the character class and use:

  s/(\]|\[)/\\$1/


To capture multiple instances in the line we add 'g'.

  s/([\][])/\\$1/g


And to make it easier to read we add x:

$value =~
s/  # start substitution
(   # capture match in $1
[\][]   # character class for [ and ]
)   # end capture
/\\$1/gx;   # replace with \[ or \] globally


Having said all this. I would still prefer Rob's
solution with two separate regexes in a 'foreach'.


HTH,

Charles K. Clarkson
-- 
Head Bottle Washer,
Clarkson Energy Homes, Inc.
Mobile Home Specialists
254 968-8328


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi..

[Ajey Kulkarni]

thanks Charles.I will give the ryt subject next time.


On Fri, 2 Jan 2004, Charles K. Clarkson wrote:

> Ajey Kulkarni <[EMAIL PROTECTED]> wrote:
> 
> : Subject: hi..
> 
> 
> Great subject. So much better than "Need help with regex"
> or "Need to escape []". Always keep us guessing.
> 
> 
> : i want to 'insert' an escape character for every '[' & ']' 
> : i will find in a variable..
> :
> : Suppose $temp has a word which might contain [ and/or ].
> : Eg: if $temp has hello]
> : the modified temp should have hello\]
> : 
> : if $value  has [hello] i want the result to be \[hello\]. 
> : 
> : Is there a quick one line regex to do this?
> : i'm able to match the presence of [ & ]
> : if( (/\[/)|(/\]/) ){
> :  my $value = $_;
> :  $value =~ s/\[/\\\[/;
> :  $value =~ s/\]/\\\]/;
> :  print $value;
> : }
> 
> A one-liner is not necessarily better. You might want
> to test. The substitution operator has a pattern on the
> left side and a replacement string on the other. According
> to 'perlop' it takes this form:
> 
>   s/PATTERN/REPLACEMENT/egimosx
> 
> 
> Let's take a look at your phrase:
> 
> s/\[/\\\[/
> 
> 
> The PATTERN is '\[' and the REPLACEMENT is "\\\[". I
> put the REPLACEMENT in double quotes because that is how
> it is most commonly interpolated. To print '\[' we need
> "\\[" on the REPLACEMENT side.
> 
> 
> The PATTERN side views '[', and ']' as special
> characters. So we need to escape them or we need to use
> some other means to describe them. To look for more than
> one we can place them in a character class: [\[\]] or as
> [\][] then capture the one we match: ([\][]).
> 
>   s/([\][])/\\$1/
> 
> We could also avoid the character class and use:
> 
>   s/(\]|\[)/\\$1/
> 
> 
> To capture multiple instances in the line we add 'g'.
> 
>   s/([\][])/\\$1/g
> 
> 
> And to make it easier to read we add x:
> 
> $value =~
> s/  # start substitution
> (   # capture match in $1
> [\][]   # character class for [ and ]
> )   # end capture
> /\\$1/gx;   # replace with \[ or \] globally
> 
> 
> Having said all this. I would still prefer Rob's
> solution with two separate regexes in a 'foreach'.
> 
> 
> HTH,
> 
> Charles K. Clarkson
> -- 
> Head Bottle Washer,
> Clarkson Energy Homes, Inc.
> Mobile Home Specialists
> 254 968-8328
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>  
> 
> 
> 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: hi!!

[WilliamGunther]

>In a message dated 3/5/2004 6:11:53 PM Eastern Standard Time, 
>[EMAIL PROTECTED] writes:
>i have downloaded cygwin and perl 5.0 comes along with it.
>How can i access perl from cygwin. My purpose is only to be able to write a 
script in perl >and run it using cygwin. Can anyone help me with this..
>
>regards
>aalok

 
To be specific, I think perl 5.8.2 comes with cygwin :-) You access perl 
through cygwin like normal. Just run cygwin and run, 'perl /path/to/script.pl'. 
Or, if you put the path (#/usr/local/bin/perl on cygwin) you can run it as 
"/path/to/script.pl" (Remember though, if you're in the directory of the perl 
script, it isn't "script.pl" it is "./script.pl")

If you have already been coding Perl on a Windows system (just assumed your 
on a Windows system because you got cygwin) it doesn't take too much getting 
use to since you've had to learn Perl for Unix and then figure out to exceptions 
for Windows. cygwin is a relief after you've been fumbling with mc and 
ActiveState. 


-will
(the above message is double rot13 encoded for security reasons)

Most Useful Perl Modules
-strict
-warnings
-Devel::DProf
-Benchmark
-B::Deparse
-Data::Dumper
-Clone (a Godsend)
-Perl::Tidy
-Beautifier

Re: hi!!

[Joel]

This is off topic, but is cygwin just the ports of GNU software for windows,
or is it an actual command line interface that simulates linux?

Joel

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi

[John W. Krahn]

Gayatri wrote:
> 
> Thanks I got a solution.

Please reply in the original thread that you started.

> I was doing a silly mistake.
> chdir I was executing thro' system command like cd.

When you do that system creates a new process and any changes you make
in that process do not affect your currently running program.


John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

RE: Hi

[Dan Muey]

> am having a problem with my perl scripts in that the news 
> items are not being displayed when i execute the wed pages on 

Where do these "news items" come from?

> which perl is expected to display the news titles. i have 

How does perl get the "news titles" and how are you having it "display" them?

> checked the path were perl is being executed from (checked 
> both in the Apache httpd.conf file and in the scripts) as 
> shown below. am using windows advanced server active perl 5.6 
> apache1.3
> 
> 
> #!d:/intranet/usr/local/perl/bin/perl 
> # Define Variables 
> require "config.cgi"; 
> require "np-lib.cgi"; 
> ##
>  
> # # 
> # DO NOT EDIT BELOW THIS LINE # 
> # # 
> ## 

This doen't tell us anything really, how is it getting the data and what 
is it you're trying to get it to do with thte data and how are oyu trying to do it?


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

RE: Hi.

[Bob Showalter]

> -Original Message-
> From: Tyler Cruickshank [mailto:[EMAIL PROTECTED]]
> Sent: Friday, August 17, 2001 2:53 PM
> To: [EMAIL PROTECTED]
> Subject: Hi.
> 
> 
> Hi.
> 
> I am working with a hash of arrays.  Ive run into some 
> confusion regarding the accessing and printing of the hash.  
> Below are some excerpts of my code:  I have an array (@data) 
> that I will create in a nested for loop.  I fully populate 
> the array and then assign it to a hash, I then go back and 
> populate a fresh array and then assign it to the hash.   Each 
> fresh array will be called the same name, @data, however it 
> is assigned to the hash via a unique key (which in this case 
> is $name).  Now, when I want to print the hash (as below) the 
> following works - print " $name = @{ $browns{$name} }\n"; but 
> I have found (in other code) that - print " $name = @{ 
> $browns{'data.hr3'} }\n"; works inconsistently.  What is the 
> proper way to do this - especially if I want a specific array 
> within the hash?
> 
> %browns = ();
> 
> for($i=1; $i<=3; $i++){
> 
>$hour = "hr$i";
>$root = 'data.';
>$name = "$root$hour";
> 
>$browns{$name} = [ @data ];
>}
> 
> 
> print "   $browns{$name}[1]   \n";
> print " $name = @{ $browns{'data.hr3'} }\n"; 
> print " $name = @{ $browns{$name} }\n";

You need to give more information. This code appears to run fine for me when
I supply some
values for @data. What is it printing? What do you expect it to be printing?

P.S. A more descriptive subject line is considered helpful as well.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

RE: Hi

[Bob Showalter]

Anish Kumar K. wrote:
> Hi

Welcome.

> 
> I am Beginner in perl..Can any one sugges some sample programs of
> PERL where I can build the skills. Please let me know at the
> earliest. Thanks  

Start at http://learn.perl.org

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi ....

[Jeff Pang]

Welcome.
But,would you maybe never send a test message to this list?
It would trouble most of the people on this list. :)

-Original Message-
>From: "Chris E. Rempola" <[EMAIL PROTECTED]>
>Sent: Mar 9, 2007 11:33 AM
>To: beginners@perl.org
>Subject: Hi 
>
>Hi All:
>
>Just sending a test email to see if this works.  I started reading the 
>archives & saw that this is a very friendly community.  I'm a PERL 
>beginner & I've already learned some things reading the archives.  Glad 
>I found you guys!  Thanks.
>


--
http://home.arcor.de/jeffpang/

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi ....

[John W. Krahn]

Chris E. Rempola wrote:
> Hi All:

Hello,

> Just sending a test email to see if this works.  I started reading the
> archives & saw that this is a very friendly community.  I'm a PERL

http://perldoc.perl.org/perlfaq1.html#What's-the-difference-between-%22perl%22-and-%22Perl%22%3f


:-)

John
-- 
Perl isn't a toolbox, but a small machine shop where you can special-order
certain sorts of tools at low cost and in short order.   -- Larry Wall

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi ....

[Neal Clark]

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1

(from the link) But never write "PERL", because perl is not an  
acronym, apocryphal folklore and post-facto expansions  
notwithstanding.


I always thought it was an acronym, for "Pratical Extraction and  
Report Language". Is that untrue, just one of those post-facto  
expansions?



On Mar 9, 2007, at 11:31 AM, John W. Krahn wrote:


Chris E. Rempola wrote:

Hi All:


Hello,

Just sending a test email to see if this works.  I started reading  
the

archives & saw that this is a very friendly community.  I'm a PERL


http://perldoc.perl.org/perlfaq1.html#What's-the-difference-between- 
%22perl%22-and-%22Perl%22%3f



:-)

John
--
Perl isn't a toolbox, but a small machine shop where you can  
special-order
certain sorts of tools at low cost and in short order.   --  
Larry Wall


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/




-BEGIN PGP SIGNATURE-
Version: GnuPG v1.4.3 (Darwin)

iD8DBQFF8cBvuT/QpFTX5YIRAm9pAKDFXOb/66EJQVCea/Fh7NhFELbFjACgq/IG
ancDeR0+a7rXobtE3AApPz4=
=Anpl
-END PGP SIGNATURE-

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi ....

[David Moreno Garza]

Neal Clark wrote:
> I always thought it was an acronym, for "Pratical Extraction and  
> Report Language". Is that untrue, just one of those post-facto  
> expansions?

Indeed, just as Pathologically Eclectic Rubbish Lister.

-- 
David Moreno Garza <[EMAIL PROTECTED]> | http://www.damog.net/
 Si tienes quién te quiera, entonces eres millonario.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

RE: hi?

[Nic LAWRENCE]

Absolutely not.

> -Original Message-
> From: the cut throat party (for self defense)
> [mailto:[EMAIL PROTECTED]]
> Sent: 15 April 2001 4:35
> To: [EMAIL PROTECTED]
> Subject: hi?
> 
> 
> 
> new to the list...  anyone alive?
> 
> Jim S.
> 
> "getting drunk by yourself is not sick...
> if its a private party"
> 

Re: hi?

[Mike Lacey]

Quite.

- Original Message - 
From: "Nic LAWRENCE" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Sunday, April 15, 2001 4:46 PM
Subject: RE: hi?


> Absolutely not.
> 
> > -Original Message-
> > From: the cut throat party (for self defense)
> > [mailto:[EMAIL PROTECTED]]
> > Sent: 15 April 2001 4:35
> > To: [EMAIL PROTECTED]
> > Subject: hi?
> > 
> > 
> > 
> > new to the list...  anyone alive?
> > 
> > Jim S.
> > 
> > "getting drunk by yourself is not sick...
> > if its a private party"
> >

Re: Hi all!

[Shlomi Fish]

On Tuesday 30 Mar 2010 13:38:12 chew23 wrote:
> Hi all guys,
>   I'm new to PERL, I'm now to the list.
> 
> This is just for a presentation...
> 

Hi chew23!

Welcome to the Perl world , Perl community and this list. You can find many 
resources and links to resources for Perl beginners on the Perl Beginners' 
Site:

http://perl-begin.org/

I hope you're going to like Perl 5 and will use it for years to come. [P6]
Just a note - it's either "Perl" or "perl" but never "PERL":

http://perl.org.il/misc.html#pl_vs_pl

Regards,

Shlomi Fish

[P6] - Perl 6 is entirely different, and as good as it may eventually be, 
still does not have a production-ready implementation, nor does it intend to 
completely eliminate Perl 5.

> See you soon.
> chew23

-- 
-
Shlomi Fish   http://www.shlomifish.org/
Why I Love Perl - http://shlom.in/joy-of-perl

Deletionists delete Wikipedia articles that they consider lame.
Chuck Norris deletes deletionists whom he considers lame.

Please reply to list if it's a mailing list post - http://shlom.in/reply .

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi all!

[chew23]

Welcome to the Perl world , Perl community and this list. You can find many
resources and links to resources for Perl beginners on the Perl Beginners'
Site:

http://perl-begin.org/


Many thanks for this!


I hope you're going to like Perl 5 and will use it for years to come. [P6]
Just a note - it's either "Perl" or "perl" but never "PERL":

http://perl.org.il/misc.html#pl_vs_pl


I apologize to the list, but I was not aware of this.


--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi all!

[Shawn H Corey]

On Tue, 30 Mar 2010 18:20:02 +0200
chew23  wrote:
> >
> > I hope you're going to like Perl 5 and will use it for years to
> > come. [P6] Just a note - it's either "Perl" or "perl" but never
> > "PERL":
> >
> > http://perl.org.il/misc.html#pl_vs_pl
> 
> I apologize to the list, but I was not aware of this.

Few non-Perl mongers are.  (It's just that some mongers get really
antsy if you get it wrong.)

FYI:  Perl is used for the language and anything related to it.  perl
is the name of the program that runs Perl scripts.  If in doubt, use
Perl.

Also, Perl mongers are advocates for Perl.  See http://www.pm.org/ to
find mongers near you.


-- 
Just my 0.0002 million dollars worth,
  Shawn

Programming is as much about organization and communication
as it is about coding.

I like Perl; it's the only language where you can bless your
thingy.

Eliminate software piracy:  use only FLOSS.

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi all!

[Shlomi Fish]

On Tuesday 30 Mar 2010 20:02:54 Shawn H Corey wrote:
> On Tue, 30 Mar 2010 18:20:02 +0200
> 
> chew23  wrote:
> > > I hope you're going to like Perl 5 and will use it for years to
> > > come. [P6] Just a note - it's either "Perl" or "perl" but never
> > > "PERL":
> > > 
> > > http://perl.org.il/misc.html#pl_vs_pl
> > 
> > I apologize to the list, but I was not aware of this.
> 
> Few non-Perl mongers are.  (It's just that some mongers get really
> antsy if you get it wrong.)
> 

Well, you can blame the ghosts of the ancient Greek for thinking that 
introducing two parallel sets of letters - the uppercase and the lowercase 
ones was a good idea. Some alphabets such as the Hebrew Alphabet or the Arabic 
Alphabet only have one set of letters, and they work fine. That put aside, I 
still try to write in proper-case English and prefer to read properly-
capitalised English text, because I find it easier.

> FYI:  Perl is used for the language and anything related to it.  perl
> is the name of the program that runs Perl scripts.  If in doubt, use
> Perl.

My link explained that.

> 
> Also, Perl mongers are advocates for Perl.  See http://www.pm.org/ to
> find mongers near you.

Another thing - the word "monger". Compare:

1. Fish monger.

2. Perl monger.

3. Hate monger.

In Hebrew 1 would be "Mokher", 2 would be "Shocher" and 3 would be 
"Mecharcher". If we called ourselves "Mokhrey HaPerl" or "Mecharcherey HaPerl" 
people will get the wrong idea.

Regards,

Shlomi Fish

-- 
-
Shlomi Fish   http://www.shlomifish.org/
Stop Using MSIE - http://www.shlomifish.org/no-ie/

Deletionists delete Wikipedia articles that they consider lame.
Chuck Norris deletes deletionists whom he considers lame.

Please reply to list if it's a mailing list post - http://shlom.in/reply .

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/

Re: Hi All

[Chris Devers]

On Tue, 15 Nov 2005, Santosh Reddy wrote:

> This is my first mail to this mailing list. I am just starting to 
> learn Perl.
>
> Please help me in getting the basics cleared.

Here's some basics:

http://learn.perl.org/

Here's another:

This list responds best to direct questions about specific problems.

If you want open-ended help with something that you haven't yet taken 
any time to research for yourself, stop right there, fire up your web 
browser (or get out your O'Reilly books), and spend some time studying 
up on the copious material that is already available for people that are 
just learning, as you are. 

Once you get your feet wet, and are working on specific tasks that you 
need help with, feel free to send specific questions -- along the lines 
of "why doesn't this code work?" or "why doesn't this line do what I 
think it should" or "how can I complete the following subroutine?" -- 
and we will be happy to help you out.

But i you just want to open-endedly "get the basics cleared", then this 
list is utterly the wrong place to ask. Start with a web search. Start 
with an excellent site like learn.perl.org. Start with some independent 
reading and practicing. And then come back to us once you're ready for 
the next step.


-- 
Chris Devers

©957‚ˆðVÓ
-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi All

[Pant, Hridyesh]

Check this site http://perldoc.perl.org/

Regards
Hridyesh

-Original Message-
From: Santosh Reddy [mailto:[EMAIL PROTECTED] 
Sent: 15 November 2005 12:10
To: beginners@perl.org
Subject: Hi All


Hi All,

 

This is my first mail to this mailing list. I am just starting to learn
Perl.

Please help me in getting the basics cleared.

 

Thanks

Santosh

 

 

 


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi All

[Randal L. Schwartz]

> "Hridyesh" == Hridyesh Pant <[EMAIL PROTECTED]> writes:

Hridyesh> Check this site http://perldoc.perl.org/

Why refer someone to a website that replicates everything that is on
their own disk anyway?  It boggles my mind every time I see this!

Learn to use the "perldoc" command.

As for sites, check the resources of http://learn.perl.org/

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
 http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi All

[Pant, Hridyesh]

For merlyn:
I don't know about your mind functionality and even don't want to
know.but I am sorry if it boggles ur mind.
For perl User:
Any way I just sent the link which might be useful to somebody.

Thanks
Hridyesh

-Original Message-
From: merlyn@stonehenge.com [mailto:[EMAIL PROTECTED] 
Sent: 16 November 2005 15:06
To: beginners@perl.org
Subject: Re: Hi All


>>>>> "Hridyesh" == Hridyesh Pant <[EMAIL PROTECTED]> writes:

Hridyesh> Check this site http://perldoc.perl.org/

Why refer someone to a website that replicates everything that is on
their own disk anyway?  It boggles my mind every time I see this!

Learn to use the "perldoc" command.

As for sites, check the resources of http://learn.perl.org/

-- 
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777
0095
 http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl
training!

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: Hi All

[Shawn Corey]

Randal L. Schwartz wrote:

"Hridyesh" == Hridyesh Pant <[EMAIL PROTECTED]> writes:



Hridyesh> Check this site http://perldoc.perl.org/

Why refer someone to a website that replicates everything that is on
their own disk anyway?  It boggles my mind every time I see this!



Because searching perldoc really, really sucks. The only search 
available is `perldoc -q keyword` and it only searches the FAQs and 
then, only their questions. That's right, only the questions; the 
answers are skipped!


If you want to make perldoc useful, why don't you organize a project to 
go thru its PODs and add X<...> where appropriate?



--

Just my 0.0002 million dollars worth,
   --- Shawn

"Probability is now one. Any problems that are left are your own."
   SS Heart of Gold, _The Hitchhiker's Guide to the Galaxy_

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi All

[Dennis G. Wicks]

On Wed, 16 Nov 2005, Shawn Corey wrote:

> Date: Wed, 16 Nov 2005 08:34:16 -0500
> From: Shawn Corey <[EMAIL PROTECTED]>
> To: beginners@perl.org
> Subject: Re: Hi All
>
> Randal L. Schwartz wrote:
> >>>>>>"Hridyesh" == Hridyesh Pant <[EMAIL PROTECTED]> writes:
> >
> >
> > Hridyesh> Check this site http://perldoc.perl.org/
> >
> > Why refer someone to a website that replicates everything that is on
> > their own disk anyway?  It boggles my mind every time I see this!
> >
>
> Because searching perldoc really, really sucks. The only search
> available is `perldoc -q keyword` and it only searches the FAQs and
> then, only their questions. That's right, only the questions; the
> answers are skipped!
>
> If you want to make perldoc useful, why don't you organize a project to
> go thru its PODs and add X<...> where appropriate?
>

I agree. Perldoc is of little use to the beginning student
of perl. It needs a function similar to  man -k  then it
would be really useful.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>

RE: Hi All

[Gomez, Juan]

But  why no one has done something to make Perldoc more helpful for all?

 


Armando Gomez Guajardo 
Process Engineer
Work Ph   956 547 6438 
Beeper956 768 4070

-Original Message-
From: Dennis G. Wicks [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, November 16, 2005 8:05 AM
To: beginners@perl.org
Subject: Re: Hi All


On Wed, 16 Nov 2005, Shawn Corey wrote:

> Date: Wed, 16 Nov 2005 08:34:16 -0500
> From: Shawn Corey <[EMAIL PROTECTED]>
> To: beginners@perl.org
> Subject: Re: Hi All
>
> Randal L. Schwartz wrote:
> >>>>>>"Hridyesh" == Hridyesh Pant <[EMAIL PROTECTED]>
writes:
> >
> >
> > Hridyesh> Check this site http://perldoc.perl.org/
> >
> > Why refer someone to a website that replicates everything that is on

> > their own disk anyway?  It boggles my mind every time I see this!
> >
>
> Because searching perldoc really, really sucks. The only search 
> available is `perldoc -q keyword` and it only searches the FAQs and 
> then, only their questions. That's right, only the questions; the 
> answers are skipped!
>
> If you want to make perldoc useful, why don't you organize a project 
> to go thru its PODs and add X<...> where appropriate?
>

I agree. Perldoc is of little use to the beginning student of perl. It
needs a function similar to  man -k  then it would be really useful.

--
To unsubscribe, e-mail: [EMAIL PROTECTED] For additional
commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/>
<http://learn.perl.org/first-response>


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: Hi All

[Bob Showalter]

Shawn Corey wrote:
...searching perldoc really, really sucks. The only search 
available is `perldoc -q keyword` and it only searches the FAQs and 
then, only their questions. That's right, only the questions; the 
answers are skipped!


Here's a 3-line shell script I use to grep through the core documentation.

   #!/bin/sh
   poddir=$(dirname $(perldoc -l perl))
   grep -r "$@" $poddir/*.pod

Example (on FreeBSD 5.4):

   $ podgrep -iwl gethostbyname
   /usr/local/lib/perl5/5.8.7/pod/perlfaq9.pod
   /usr/local/lib/perl5/5.8.7/pod/perlfunc.pod
   /usr/local/lib/perl5/5.8.7/pod/perlipc.pod
   /usr/local/lib/perl5/5.8.7/pod/perlos390.pod
   /usr/local/lib/perl5/5.8.7/pod/perlport.pod
   /usr/local/lib/perl5/5.8.7/pod/perltoc.pod
   /usr/local/lib/perl5/5.8.7/pod/perltoot.pod
   /usr/local/lib/perl5/5.8.7/pod/perlvms.pod

But I agree that a Google search like "gethostbyname 
site:perldoc.perl.org" is superior.


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi All

[Paul Johnson]

On Wed, Nov 16, 2005 at 08:28:39AM -0600, Gomez, Juan wrote:

> But  why no one has done something to make Perldoc more helpful for all?

Who are you expecting to do that?  Perl is developed by volunteers.  And
the number of active developers is vanishingly small compared to the
number of people who use Perl every day.

Volunteers generally work on what they find interesting or stimulating
or challenging.  This is not always the case of course, people have
their own motives.  Maybe you are sufficiently motivated to work on
improving perldoc?  It would appear that most people aren't.

Since Perl is open source, you have the usual options if you want
something done:

 1.  Do it yourself.
 2.  Get someone else to do it.
 3.  Wait.

Often the best way to get someone else to do something for you is to pay
them.  Yes, this is all a little simplistic, but the principles hold.

-- 
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi all

[Bob McConnell]

From: Anusha Krishna chand
>   I have to make my back button of the browser disable ... can any
one
> help me in doing that using perl script...
> Thanks in advance
> Anusha Krishnachand

The quickest way to do that in most browsers is right click on the
toolbar, select customize and remove the button from the bar.

If you mean disable it on browsers used to view your pages, you can't do
that and shouldn't even try. That button is a basic feature of the
browser and should always be available. I do know there is a javascript
trick that works on some browsers, but I consider that a bug that should
have been fixed long ago. I also file bug reports on any site that I
notice interfering with the use of back and forward buttons.

Another option is to add 'target="_blank"' attribute to the anchor to
open the page in a new tab or window.

Bob McConnell

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

RE: Hi & a question

[Pandey Rajeev-A19514]

hey !!!

do you celebrate only perl even in the christmas vacation !!!
Take a break !! Have a kit kat christmas cake.
Merry Christmas to this perl group 

Rajeev 

-Original Message-
From: John McKown [mailto:[EMAIL PROTECTED]
Sent: Friday, December 26, 2003 11:08 PM
To: Perl Beginners Mailing List
Subject: Hi & a question


I'm new here and a very novice Perl coder. And I have a question, of 
course .

Is it more "Perl-like" to get information from the shell via UNIX 
Environment Variables or via the command line? For an example, I have 
writing a Perl program which reacts to messages sent to it. It has four 
input parameters. The current program gets this information, which is two 
distinct subdirectories, a port number, and an IP address, via four 
different environment variables. My question is should I do it that way or 
should I pass this information in via the command line. 

E.g.

export DIR1=...
export DIR2=...
export IPADDR=...
export IPPORT=...
perl-script.perl

or

perl-script.perl DIR1 DIR2 IPADDR IPPORT

Although my current code uses the first way, I'm beginning to think that 
the second is preferrable because it would be more portable to non-UNIX 
environments.

I hope everybody is having a good holiday.

--
Maranatha!
John McKown


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi & a question

[Steven Kreuzer]

Why not just make DIR1, DIR2, IPADDR AND IPPORT global variables within
the script, rather then requiring user to set env variables, which can
become a pain in the ass.

Your best bet would be to set them to some default variable, and then if
the user needs to, she can override the default values by passing the
new values as parameters. Hope that helps.

Steven Kreuzer
Linux Systems Administrator
Etagon, Inc
W: 646.728.0656
F: 646.728.0607
E: [EMAIL PROTECTED]


-Original Message-
From: John McKown [mailto:[EMAIL PROTECTED] 
Sent: Friday, December 26, 2003 12:38 PM
To: Perl Beginners Mailing List
Subject: Hi & a question

I'm new here and a very novice Perl coder. And I have a question, of 
course .

Is it more "Perl-like" to get information from the shell via UNIX 
Environment Variables or via the command line? For an example, I have 
writing a Perl program which reacts to messages sent to it. It has four 
input parameters. The current program gets this information, which is
two 
distinct subdirectories, a port number, and an IP address, via four 
different environment variables. My question is should I do it that way
or 
should I pass this information in via the command line. 

E.g.

export DIR1=...
export DIR2=...
export IPADDR=...
export IPPORT=...
perl-script.perl

or

perl-script.perl DIR1 DIR2 IPADDR IPPORT

Although my current code uses the first way, I'm beginning to think that

the second is preferrable because it would be more portable to non-UNIX 
environments.

I hope everybody is having a good holiday.

--
Maranatha!
John McKown


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 



--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: Hi & a question

[Harvey, Bruce T.]

I'm not a 'perl' pro, but I am a pro at using different shells, programs and
so on in different environments.  

It depends on the environment in which you're running.

For example, running on some type of *NIX at a command line, you might very
well want command line options so that people and scripts can easily change
the arguments (it is a pain to change environment variables ... more typing
and saving and exporting and what not).

However, if your perl script is called from other perl scripts (since people
aren't typing it), you may want to change the environment.

Of course, you may want to hide the arguments, in which case, variables in a
file readable by the script would be the choice, so that no one could see
the arguments (*NIX ps -elf) or the environment (*NIX ps axe).

IMHO, it really depends on what the best use is ... how much a pain ...
what's the protection ... do different people need different environments
but NEVER change it once they have that environment (the case for
Environment variables) ... etc.

I don't run much under M$ Windows, but that may very well point you in a
particular direction, based on what's easily available.

Bruce T. Harvey
Legg Mason Wood Walker, Inc.
Corporate Technology - UNIX Admin.
Red Run 2nd Floor - Owings Mills, MD
(410) 580-7383 - [EMAIL PROTECTED]
---



-Original Message-
From: John McKown [mailto:[EMAIL PROTECTED]
Sent: Friday, December 26, 2003 12:38 PM
To: Perl Beginners Mailing List
Subject: Hi & a question


I'm new here and a very novice Perl coder. And I have a question, of 
course .

Is it more "Perl-like" to get information from the shell via UNIX 
Environment Variables or via the command line? For an example, I have 
writing a Perl program which reacts to messages sent to it. It has four 
input parameters. The current program gets this information, which is two 
distinct subdirectories, a port number, and an IP address, via four 
different environment variables. My question is should I do it that way or 
should I pass this information in via the command line. 

E.g.

export DIR1=...
export DIR2=...
export IPADDR=...
export IPPORT=...
perl-script.perl

or

perl-script.perl DIR1 DIR2 IPADDR IPPORT

Although my current code uses the first way, I'm beginning to think that 
the second is preferrable because it would be more portable to non-UNIX 
environments.

I hope everybody is having a good holiday.

--
Maranatha!
John McKown


IMPORTANT:  The security of electronic mail  sent through the Internet 
is not guaranteed.  Legg Mason therefore recommends that you do not 
send confidential information to us via electronic mail, including social 
security numbers, account numbers, and personal identification numbers.

Delivery, and timely delivery, of electronic mail is also not 
guaranteed.  Legg Mason therefore recommends that you do not send time-sensitive 
or action-oriented messages to us via electronic mail, including 
authorization to  "buy" or "sell" a security or instructions to conduct any 
other financial transaction.  Such requests, orders or instructions will 
not be processed until Legg Mason can confirm your instructions or 
obtain appropriate written documentation where necessary.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[R. Joseph Newton]

Pandey Rajeev-A19514 wrote:

> hey !!!
>
> do you celebrate only perl even in the christmas vacation !!!
> Take a break !! Have a kit kat christmas cake.
> Merry Christmas to this perl group 
>
> Rajeev

I might remind you--not everyone even celbrates that particular holiday.  I
join my family in the celebration, and finds that it works fine that way as a
celebration of the solstice.  I cetainly don't feel, though, that I have to
stop creative engagements, to celbrate a holiday.

Joseph


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[R. Joseph Newton]

John McKown wrote:

> I'm new here and a very novice Perl coder. And I have a question, of
> course .
>
> Is it more "Perl-like" to get information from the shell via UNIX
> Environment Variables or via the command line? For an example, I have
> writing a Perl program which reacts to messages sent to it. It has four
> input parameters. The current program gets this information, which is two
> distinct subdirectories, a port number, and an IP address, via four
> different environment variables. My question is should I do it that way or
> should I pass this information in via the command line.
>
> E.g.
>
> export DIR1=...
> export DIR2=...
> export IPADDR=...
> export IPPORT=...
> perl-script.perl
>
> or
>
> perl-script.perl DIR1 DIR2 IPADDR IPPORT
>
> Although my current code uses the first way, I'm beginning to think that
> the second is preferrable because it would be more portable to non-UNIX
> environments.
>
> I hope everybody is having a good holiday.
>
> --
> Maranatha!
> John McKown

Hi John,

I'd suggest that both approaches can be somewhat lacking in portability.  The
command line is something of a kludge, IMHO, as it still depends largely on
users typing in the correct parameters.  I think ini files would be portable
across a much wider variety of systems.  Just write the ini file per
installation configuration.

Joseph


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[John McKown]

On Fri, 26 Dec 2003, R. Joseph Newton wrote:

> 
> Hi John,
> 
> I'd suggest that both approaches can be somewhat lacking in portability.  The
> command line is something of a kludge, IMHO, as it still depends largely on
> users typing in the correct parameters.  I think ini files would be portable
> across a much wider variety of systems.  Just write the ini file per
> installation configuration.
> 
> Joseph
> 

Actually, I considered an "ini" or "cfg" file, but rejected it. I was 
wanting something more "standalone" in this case. First, it seemed a bit 
much for only 4 parms. Second, I didn't want to maintain a separate file. 
Third, I didn't want to parse an "ini" file, although there is likely a 
CPAN module around to do that. And I already use LWP::UserAgent and 
HTTP::Request::Common, so requiring another CPAN modules is not really a 
big deal. I really appreciate CPAN!

--
Maranatha!
John McKown


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[Daniel Staal]

--As off Friday, December 26, 2003 3:16 PM -0600, John McKown is 
alleged to have said:

Actually, I considered an "ini" or "cfg" file, but rejected it. I
was  wanting something more "standalone" in this case. First, it
seemed a bit  much for only 4 parms. Second, I didn't want to
maintain a separate file.  Third, I didn't want to parse an "ini"
file, although there is likely a  CPAN module around to do that.
And I already use LWP::UserAgent and  HTTP::Request::Common, so
requiring another CPAN modules is not really a  big deal. I really
appreciate CPAN!
--As for the rest, it is mine.

Personal opinion: A cfg file is much easier to update/maintain then 
environment variables, and a command line is easier to use for 
'variable' setups.  For a case like this I would probably want to use 
a combined commandline/config file setup.  Luckily, that only 
requires *one* CPAN module: AppConfig.  It will handle both, in 
either order.

Daniel T. Staal

---
This email copyright the author.  Unless otherwise noted, you
are expressly allowed to retransmit, quote, or otherwise use
the contents for non-commercial purposes.  This copyright will
expire 5 years after the author's death, or in 30 years,
whichever is longer, unless such a period is in excess of
local copyright law.
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[drieux]

On Dec 26, 2003, at 9:37 AM, John McKown wrote:
[..]
E.g.

export DIR1=...
export DIR2=...
export IPADDR=...
export IPPORT=...
perl-script.perl
or

perl-script.perl DIR1 DIR2 IPADDR IPPORT
[..]

Thanks for the seasonal ranting option:



I must confess that I find it rather ironic that you
started with environmental variables rather than
positional arguments. I would of course recommend
that you start with
	perldoc Getopt::Long

One of my more demented variants is up at:


But what I think you will really want to get in touch with
is the idea of a configuration file, either as a 'default
preference' file, if this is really going to be an application
layer programme - or in the more traditional set of issues
related to writing daemons and configuration files for them.
ciao
drieux
---

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[John McKown]

Daniel,
For only 4 variables, I thought it was overkill to have an "ini" file. 
However as I continue to mess around with my code, I'm adding more and 
more externalized variables. Use of an "ini" is becoming more appealing. 

Thanks for your thoughts!

 On Sun, 28 Dec 2003, Daniel Staal wrote:

> Personal opinion: A cfg file is much easier to update/maintain then 
> environment variables, and a command line is easier to use for 
> 'variable' setups.  For a case like this I would probably want to use 
> a combined commandline/config file setup.  Luckily, that only 
> requires *one* CPAN module: AppConfig.  It will handle both, in 
> either order.
> 
> Daniel T. Staal
> 

--
Maranatha!
John McKown


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi & a question

[drieux]

On Dec 31, 2003, at 8:28 AM, John McKown wrote:

For only 4 variables, I thought it was overkill to have an "ini" file.
However as I continue to mess around with my code, I'm adding more and
more externalized variables. Use of an "ini" is becoming more 
appealing.
john,

for what it is worth - cf:

in it I have references to two pieces of demonstration
code that you might want to think about as tactics in
this type of problem.


ciao
drieux
---

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: Hi, newbie question

[Yasen Petrov]

Hello,

I don't think that the file matters. You say it's a massive line. To read a
file you should first open it. Look at PerlDoc.


"Desmond Lee" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> Hi guys
>
> I'm trying to read a file, but it's just one massive line. I think that
the
> ^M  is suppose to be an indication that that's wehre teh newline is
suppose
> to be. I've tried to replace ^M with a newline by executing something that
i
> found on the web:
>
> perl -pi.bak -e 's/\^M/\n/g' moby_threads_install.txt
>
>
> This didn't work. Even in vi when i do a search for ^M by doing '/^M' it
> says that no matches were found. The ^M is not two characters but one. Can
> anyone out there please help me?
>
> Thanks
>
> Desmond
>
> _
> Send and receive Hotmail on your mobile device: http://mobile.msn.com
>



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: Hi, newbie question

[Marco Antonio Valenzuela Escárcega]

On Mon, 2002-07-22 at 14:41, Desmond Lee wrote:
> Hi guys
> 
> I'm trying to read a file, but it's just one massive line. I think that the 
> ^M  is suppose to be an indication that that's wehre teh newline is suppose 
> to be. I've tried to replace ^M with a newline by executing something that i 
> found on the web:
> 
> perl -pi.bak -e 's/\^M/\n/g' moby_threads_install.txt

try: 
perl -pi.bak -e 's/\r/\n/g' moby_threads_install.txt



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: Hi, newbie question

[Robert Thompson]

In vi, you have to type ctrl-v ctrl-m. This will tell vi you mean control-m and not 
carrot-m.

:%s///g

=-= Robert Thompson

> > Even in vi when i do a search for ^M by doing '/^M' it says that no matches were 
>found. The ^M is not two characters but one. Can anyone out there please help me?

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

postgresql questions, was Re: Hi

[Chris Devers]

On Tue, 2 Aug 2005, Anish Kumar K wrote:

> I want to retreive from postgres database by removing the dos 
> characters and the spaces from a perl file. It is like in the DB side 
> there is " " and dos charcters in the table itself. So when I am doing 
> a select query as it is checking in the table, the correct match is 
> not obtained. I have TRIED after removing in the PERL side with 
> substitution and all and confirmed this . Please give me some tips as 
> what function I can use in the query to remove the space as well as 
> DOS characters

Show us your code. 

You have been on this list for quite a while by now. 

You should know that the best way to get help is to show what you've 
already attempted to do, and explain how it didn't do what you wanted.

Also, please use descriptive subject lines. "Hi" is the same subject 
that a good fraction of the spam I get uses, and it does nothing to 
clarify what the problem at hand might be. 

Make it easy for people to help you, and you just might get the help you 
need.



-- 
Chris Devers

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

RE: hi,everyone,help me

[Bob Showalter]

> -Original Message-
> From: alex chen [mailto:cg@;gddc.com.cn]
> Sent: Sunday, November 03, 2002 6:05 AM
> To: [EMAIL PROTECTED]
> Subject: hi,everyone,help me
> 
> 
> hi,all!
>today,i have write such a program
> 
> #!usr/local/bin/perl5.6.1
> #middle machine version 1.0
> 
> use IO::Socket;
> 
> $SIG{CHLD} = sub {wait()};
> $main_sock = new IO::Socket::INET(LocalHost =>'192.168.1.2',
>   LocalPort => 34561,
>   Listen=> 5,
>   Proto => 'tcp',
>   Reuse => 1,
>  );
> die "main Socket could not be created.Reason: $!\n" unless 
> ($main_sock);
> while ($new_sock = $main_sock->accept()){
>  $pid = fork();
>   die "Cannot fork : $!" unless defined ($pid);
> if ($pid ==0){
> while (defined ($buf = <$new_sock>)){
>   print $buf;
>   send_message();}
>   exit(0);
> }
> }
> close ($main_sock);
> 
> sub send_message{
>  $send_sock = new IO::Socket::INET(PeerAddr =>'192.168.1.3',
>PeerPort =>34562,
>Proto=>'tcp'
>);
> die "Socket Could not be created.Reason:$!\n" unless $send_sock;
>   print $send_sock $buf;
>   $send_sock ->flush();
> close ($send_sock);
> }
> 
> the problem is the socket $send_sock could not establish with the host
> 192.168.1.3 while i run this program
> the hos 192.168.1.3 just a simple program to recieve the 
> message from this
> program.
> how to resolve this problem,please help me ,thanks!!! :-)

You bind the server socket $to 192.168.1.2, but your client attempts to
connect to 192.168.1.3

Does the server have two interfaces or is 192.168.1.2 the client's IP? If
the former, then change your client to connect to 1.2. If the latter, change
your server to bind to 1.3 (or leave off LocalHost altogether, to bind to
all interfaces).

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: Hi... Help regarding chdir

[Roberto Etcheverry]

It should work unless the user you are using to run the script doesn't
have the rights to chdir to that directory.

Ravindra Ugaji wrote:
> Hi Monks,
> I am trying the following code to change the directory
>
> chdir ( '/opt/application') || die ("Can't change directory: $!\n");
> tried this also
> chdir "/opt/application" || die "Can't change directory: $!\n";
>
>
> But i am unable to change the directory to " /opt/application " from
> present working directory
>
> I am using perl 5.6.1 built for sun4-solaris-64int and it wont support
> "File::chdir  "
> can any one suggest the alternative solution for this problem?
>
> :-)
>
>
>   


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi... Help regarding chdir

[Tom Phoenix]

On 12/18/07, Ravindra Ugaji <[EMAIL PROTECTED]> wrote:

> Hi Monks,

The Perl Monks are two doors down, on the left. But maybe we can help you here.

> I am trying the following code to change the directory
>
> chdir ( '/opt/application') || die ("Can't change directory: $!\n");

> But i am unable to change the directory to " /opt/application " from
> present working directory

Do you get an error message? What does it say?

If there is no error message, perhaps you mean that, after the program
has finished running, you find that the shell is still using the
original working directory. That's a feature of your operating system,
not a bug. You can't change the working directory of another program
without that program's knowledge and consent, else programs would
unexpectedly find themselves working in the wrong directories and
wreaking havoc. This is covered in the Unix FAQ, question 2.8, among
other places; but the answer is about the same in principle on any
other OS.

http://www.faqs.org/faqs/unix-faq/faq/part2/
http://packetstormsecurity.org/unix-humor/awesome.unix.chdir.program.html

Check the documentation for your shell program, too, because it may
have a suggestion on how you can do what you want.

Hope this helps!

--Tom Phoenix
Stonehenge Perl Training

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi... Help regarding chdir

[Chas. Owens]

On Dec 19, 2007 2:29 AM, Ravindra Ugaji <[EMAIL PROTECTED]> wrote:
> Hi Monks,
> I am trying the following code to change the directory
>
> chdir ( '/opt/application') || die ("Can't change directory: $!\n");
> tried this also
> chdir "/opt/application" || die "Can't change directory: $!\n";
snip

In addition to what others have already said, never do the second*.
The || operator has a higher precedence than function calls, so

func "string" || die "oops";

is really saying

func("string" || die("oops"));

Since "string" is truthy, the die will never occur.  If you want to
avoid the use of parenthesis you can use the lower precedence or:

func "string" or die "oops";

* unless, of course, it is what you really mean

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi... Help regarding chdir

[Tom Phoenix]

On 12/19/07, Chas. Owens <[EMAIL PROTECTED]> wrote:

> On Dec 19, 2007 2:29 AM, Ravindra Ugaji <[EMAIL PROTECTED]> wrote:

> > chdir ( '/opt/application') || die ("Can't change directory: $!\n");
> > tried this also
> > chdir "/opt/application" || die "Can't change directory: $!\n";

> In addition to what others have already said, never do the second*.
> The || operator has a higher precedence than function calls, so
>
> func "string" || die "oops";
>
> is really saying
>
> func("string" || die("oops"));
>
> Since "string" is truthy, the die will never occur.

You have the right idea about functions in general; but chdir() is a
"named unary operator", so it has higher precedence than the ||
operator:

  chdir "/any/wrong/path" || die "This will indeed die: $!";

That means that the OP's code isn't so wrong as it may seem, even
though there's surely a better way to write it.

Cheers!

--Tom Phoenix
Stonehenge Perl Training

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi... Help regarding chdir

[Paul Lalli]

On Dec 19, 2:29 am, [EMAIL PROTECTED] (Ravindra Ugaji) wrote:
> I am trying the following code to change the directory
>
> chdir ( '/opt/application') || die ("Can't change directory: $!\n");
> tried this also
> chdir "/opt/application" || die "Can't change directory: $!\n";
>
> But i am unable to change the directory to " /opt/application " from
> present working directory

What is your indication of that?  How do you know the directory has
not changed?  Do you get an error message, and if so, what is it?   Do
you have some code below this later that proves you're not in /opt/
application?

Or do you mean that when your program exits, you are back where you
started the program from?  That is, you are in /home/jsmith, you run
this program, and when the program exits, you're still in /home/
jsmith.   If that's the "error" you're talking about, please read:
perldoc -q directory
Found in /usr/lib/perl5/5.8/pods/perlfaq8.pod
   I {changed directory, modified my environment} in a perl
script.  How
   come the change disappeared when I exited the script?  How do I
get my
   changes to be visible?


Paul Lalli


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi... Help regarding chdir

[Chas. Owens]

On Dec 19, 2007 2:05 PM, Tom Phoenix <[EMAIL PROTECTED]> wrote:
> On 12/19/07, Chas. Owens <[EMAIL PROTECTED]> wrote:
>
> > On Dec 19, 2007 2:29 AM, Ravindra Ugaji <[EMAIL PROTECTED]> wrote:
>
> > > chdir ( '/opt/application') || die ("Can't change directory: $!\n");
> > > tried this also
> > > chdir "/opt/application" || die "Can't change directory: $!\n";
>
> > In addition to what others have already said, never do the second*.
> > The || operator has a higher precedence than function calls, so
> >
> > func "string" || die "oops";
> >
> > is really saying
> >
> > func("string" || die("oops"));
> >
> > Since "string" is truthy, the die will never occur.
>
> You have the right idea about functions in general; but chdir() is a
> "named unary operator", so it has higher precedence than the ||
> operator:
>
>   chdir "/any/wrong/path" || die "This will indeed die: $!";
>
> That means that the OP's code isn't so wrong as it may seem, even
> though there's surely a better way to write it.
snip

That is the reason I used func instead of chdir.  The "don't use || in
that way, use or instead" is more of a general warning not to use the
construct (because it will bite you).

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: Hi, what time() ^ $$ means?

[Jeff 'japhy' Pinyan]

On Jul 10, Erik W said:

>when I read the book, I saw they generate and seed by 
>using 

Just so you know, you don't need to call srand() in modern versions of
Perl.

>^   bit xor?

Yes.

>$$  logic and?

Nope, that'd be &&.  $$ is the process ID (or PID) variable.  Check
'perlvar'.

-- 
Jeff "japhy" Pinyan  [EMAIL PROTECTED]  http://www.pobox.com/~japhy/
I am Marillion, the wielder of Ringril, known as Hesinaur, the Winter-Sun.
Are you a Monk?  http://www.perlmonks.com/ http://forums.perlguru.com/
Perl Programmer at RiskMetrics Group, Inc. http://www.riskmetrics.com/
Acacia Fraternity, Rensselaer Chapter. Brother #734
**  Manning Publications, Co, is publishing my Perl Regex book  **

Re: Hi, what time() ^ $$ means?

[Stephen P. Potter]

Lightning flashed, thunder crashed and Erik W <[EMAIL PROTECTED]> whispered:
| time() ^ $$
| 
| What ^ and $$ mean here?
| 
| ^   bit xor?
| $$  logic and?

$$ is a special variable that is the process ID of the currently running
process.  So, this is returning the bitwise xor of the return of time
(seconds since epoch) and the process ID (generally something between 2 and
65536).  Since perl 5.004 or so, this has been mostly unnecessary.  Even if
it was still necessary, it would probably be better to use something like

time() ^ ($$ + ($$ << 15))

which at least gives two numbers of roughly the same magnitude.

-spp
--
Stephen P Potter[EMAIL PROTECTED]
"You can't just magically invoke Larry and expect that to prove your point.
Or prove that you have a point."-Simon Cozens
http://www.unixlabs.net/~spp/

Re: Hi, what time() ^ $$ means?

[Erik W]

--- "Stephen P. Potter" <[EMAIL PROTECTED]>
wrote:
> Lightning flashed, thunder crashed and Erik W
> <[EMAIL PROTECTED]> whispered:
> | time() ^ $$
> | 
> | What ^ and $$ mean here?
> | 
> | ^   bit xor?
> | $$  logic and?
> 
> $$ is a special variable that is the process ID of
> the currently running
> process.  So, this is returning the bitwise xor of
> the return of time
> (seconds since epoch) and the process ID (generally
> something between 2 and
> 65536).  Since perl 5.004 or so, this has been
> mostly unnecessary.  Even if
> it was still necessary, it would probably be better
> to use something like
> 
> time() ^ ($$ + ($$ << 15))
Thanks a lot, then what << means?
$$<<15 ???

perl is really unreadable!

> 
> which at least gives two numbers of roughly the same
> magnitude.
> 
> -spp
> --
> Stephen P Potter  [EMAIL PROTECTED]
> "You can't just magically invoke Larry and expect
> that to prove your point.
> Or prove that you have a point."  -Simon Cozens
> http://www.unixlabs.net/~spp/
> 


__
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail
http://personal.mail.yahoo.com/

Re: Hi, what time() ^ $$ means?

[matthschulz]

Am Dienstag, 10. Juli 2001 21:27 schrieb Erik W:
> --- "Stephen P. Potter" <[EMAIL PROTECTED]>
>
> wrote:
> > Lightning flashed, thunder crashed and Erik W
> >
> > <[EMAIL PROTECTED]> whispered:
> > | time() ^ $$
> > |
> > | What ^ and $$ mean here?
> > |
> > | ^   bit xor?
> > | $$  logic and?
> >
> > $$ is a special variable that is the process ID of
> > the currently running
> > process.  So, this is returning the bitwise xor of
> > the return of time
> > (seconds since epoch) and the process ID (generally
> > something between 2 and
> > 65536).  Since perl 5.004 or so, this has been
> > mostly unnecessary.  Even if
> > it was still necessary, it would probably be better
> > to use something like
> >
> > time() ^ ($$ + ($$ << 15))
>
> Thanks a lot, then what << means?
> $$<<15 ???
>
from perlbook.pdf: (pg.166)

Shift Operators
Binary "<<" returns the value of its left argument shifted left by the number 
of bits specified by the right
argument. Arguments should be integers. (See also Integer Arithmetic.)


> perl is really unreadable!
>
> > which at least gives two numbers of roughly the same
> > magnitude.
> >
> > -spp
> > --
> > Stephen P Potter[EMAIL PROTECTED]
> > "You can't just magically invoke Larry and expect
> > that to prove your point.
> > Or prove that you have a point."-Simon Cozens
> > http://www.unixlabs.net/~spp/
>
> __
> Do You Yahoo!?
> Get personalized email addresses from Yahoo! Mail
> http://personal.mail.yahoo.com/

Re: Hi, what time() ^ $$ means?

[Walt Mankowski]

On Tue, Jul 10, 2001 at 09:56:55PM -0400, Jeff 'japhy' Pinyan wrote:
> Just so you know, you don't need to call srand() in modern versions of
> Perl.

Unless, of course, you want to seed the random number generator to a
specific value.  :-)

Walt

Re: Hi, what time() ^ $$ means?

[Walt Mankowski]

On Tue, Jul 10, 2001 at 07:27:04PM -0700, Erik W wrote:
> Thanks a lot, then what << means?

>From perldoc perlop...

   Binary "<<" returns the value of its left argument shifted left
   by the number of bits specified by the right argument.
   Arguments should be integers.  (See also the Integer Arithmetic
   entry elsewhere in this document.)

A left shift of n bits is the same as multiplying by 2 n times, and a
right shift is the same as dividing by 2 n times.  Sometimes it's
easier to think of the bits as moving to the left or right than to
think of multiplying or dividing by powers of 2, but they're really
the same operation.

> $$<<15 ???

This shifts the value of $$ 15 bits to the left, which is the same as
multiplying $$ by 2**15.

> perl is really unreadable!

Actually bit manipulation is pretty basic computer science.  Perl
borrowed the operators from C.

Walt

Re: Hi, what time() ^ $$ means?

[Walt Mankowski]

On Wed, Jul 11, 2001 at 12:34:37AM -0400, Walt Mankowski wrote:
> On Tue, Jul 10, 2001 at 07:27:04PM -0700, Erik W wrote:
> > $$<<15 ???
> 
> This shifts the value of $$ 15 bits to the left, which is the same as
> multiplying $$ by 2**15.

I forgot to reference the code you were referring to:

>> time() ^ ($$ + ($$ << 15))

The reason they're shifting $$ 15 bits to the left is that they're
assuming that the process id (which is what $$ is) is a 15-bit
integer.  This has been traditionally true in Unix, but I believe I've
read about some support in recent Linux kernels for >32767 processes.

Once they leftshift it 15 bytes, the rightmost 15 bytes are 0.  By
adding $$ to it they fill in those empty bytes with $$ again.  The
result is a 30-bit number consisting of the bits in $$ repeated twice.

There are better methods of seeding random number generators, so this
method is mainly of educational and historical interest.  As Jeff
mentioned, in modern perls rand() will call srand() automatically the
first time it's called.

Walt

RE: Hi, what time() ^ $$ means?

[Gary L. Armstrong]

Trivially speaking, AIX goes past 32k PID numbers as well.  I believe that
v4r3 allows 32k open files per process as well. If anyone would care for
detail (and why would you???) email me at [EMAIL PROTECTED] instead of
the list so that I can look it up, and I can try to stay in topic. =)

G. Armstrong

Lost .sig in format

-Original Message-
From: Walt Mankowski [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, July 11, 2001 12:50 AM
To: [EMAIL PROTECTED]
Subject: Re: Hi, what time() ^ $$ means?


On Wed, Jul 11, 2001 at 12:34:37AM -0400, Walt Mankowski wrote:
> On Tue, Jul 10, 2001 at 07:27:04PM -0700, Erik W wrote:
> > $$<<15 ???
>
> This shifts the value of $$ 15 bits to the left, which is the same as
> multiplying $$ by 2**15.

I forgot to reference the code you were referring to:

>> time() ^ ($$ + ($$ << 15))

The reason they're shifting $$ 15 bits to the left is that they're
assuming that the process id (which is what $$ is) is a 15-bit
integer.  This has been traditionally true in Unix, but I believe I've
read about some support in recent Linux kernels for >32767 processes.

Once they leftshift it 15 bytes, the rightmost 15 bytes are 0.  By
adding $$ to it they fill in those empty bytes with $$ again.  The
result is a 30-bit number consisting of the bits in $$ repeated twice.

There are better methods of seeding random number generators, so this
method is mainly of educational and historical interest.  As Jeff
mentioned, in modern perls rand() will call srand() automatically the
first time it's called.

Walt

Re: Hi, what time() ^ $$ means?

[Stephen P. Potter]

Lightning flashed, thunder crashed and Erik W <[EMAIL PROTECTED]> whispered:
| Thanks a lot, then what << means?
| $$<<15 ???

It seems to me that you need to spend some time with a good beginners book,
such as Randal's.  Or, at least, the man pages.  These questions are easily
answered with a quick hunt through perlfunc (for the rand/srand question),
perlvar (for $$), and perlop (for <<).

<< is the left bit shift operator.  It returns the first operand with the
bits shifted the right operand number of times.

-spp

Re: Hi, what time() ^ $$ means?

[EriK W]

Excellent!

Thank you all for your help!

I am going to spend more time on man pages or beginners book.

What is the best beginners book in you opinion?

Thank you very much!



On Wed, 11 Jul 2001 12:07:47 -0400
"Stephen P. Potter" <[EMAIL PROTECTED]> wrote:

> Lightning flashed, thunder crashed and Erik W <[EMAIL PROTECTED]> whispered:
> | Thanks a lot, then what << means?
> | $$<<15 ???
> 
> It seems to me that you need to spend some time with a good beginners book,
> such as Randal's.  Or, at least, the man pages.  These questions are easily
> answered with a quick hunt through perlfunc (for the rand/srand question),
> perlvar (for $$), and perlop (for <<).
> 
> << is the left bit shift operator.  It returns the first operand with the
> bits shifted the right operand number of times.
> 
> -spp



_
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com

Re: Hi, what time() ^ $$ means?

[Stephen P. Potter]

Lightning flashed, thunder crashed and EriK W <[EMAIL PROTECTED]> whispered:
| Excellent!
| 
| Thank you all for your help!
| 
| I am going to spend more time on man pages or beginners book.
| 
| What is the best beginners book in you opinion?

Currently, I like "A Little Book on Perl" by Robert Sebesta (ISBN
0139279555).  It's nice and small and easy to get into.

I'm waiting to see a copy of "Learning Perl, 3rd edition" (Randal, HINT!).
I was disappointed with the second edition (I'll keep to myself how I think
it happened), but hold great hope for the third edition.

-spp
--
Stephen P Potter [EMAIL PROTECTED]
"You can't just magically invoke Larry and expect that to prove your point.
Or prove that you have a point."-Simon Cozens
UNIX and Perl Consulting and Training http://www.unixlabs.net/~spp/

Re: Hi,, Regarding perl modules

[Andy Greenwood]

On 10 Jan 2007 09:21:55 -, Vikas Kumar Choudhary
<[EMAIL PROTECTED]> wrote:


Hi

I am vikas here, just getting in perl..
can anybody told me to create modules and how to use these in our scripts..


$ perldoc perlmod

should get you started. To use modules you've created, just put this
at the top of your program.

use yourMod;



Thanks

Vikas Kumar Choudhary
Software Engineer
Bangalore-50078
Mobile:- 91-9886793145





--
I'm nerdy in the extreme and whiter than sour cream

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/

Re: hi please clarify my doubts

[Tom Phoenix]

On 2/13/06, DEVARAJA AP <[EMAIL PROTECTED]> wrote:

>i wrote a perlscript to generate a verilog code with instantiations .in 
> this
>  after instantiation, the ports getting as eg
>   module_name  name(.a(a),.b(b),...)
>
>   but for connection sakeif want to connect a to some k and b to some
> p (say).here we wanted to change those names manually. is ther any way
> to do trhis automatically in the instantiation part of the perl script itself.

Almost certainly, what you want is possible. Perl is very versatile.

Unfortunately, I cannot understand what you are asking about. It may
help if you include the Perl code that you're talking about. If
another language is better for you than English, feel free to try that
one.

At a guess, maybe you want something like this code. Or maybe not...

if ($alternate_site) {
$port = 'k';
} else {
$port = 'a';
}

Good luck with it!

--Tom Phoenix
Stonehenge Perl Training

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: hi please clarify my doubts

[Marilyn Sander]

Devaraja,

Is this a question about vperl?

You speak of generating verilog code.  Is the instantiation you speak
of the instantiation of your block that is defined in verilog?
What do you mean by "the instantiation part of the perl script"?

--Marilyn

Tom Phoenix wrote On 02/14/06 09:49,:
> On 2/13/06, DEVARAJA AP <[EMAIL PROTECTED]> wrote:
> 
> 
>>   i wrote a perlscript to generate a verilog code with instantiations .in 
>> this
>> after instantiation, the ports getting as eg
>>  module_name  name(.a(a),.b(b),...)
>>
>>  but for connection sakeif want to connect a to some k and b to some
>>p (say).here we wanted to change those names manually. is ther any way
>>to do trhis automatically in the instantiation part of the perl script itself.
> 
> 
> Almost certainly, what you want is possible. Perl is very versatile.
> 
> Unfortunately, I cannot understand what you are asking about. It may
> help if you include the Perl code that you're talking about. If
> another language is better for you than English, feel free to try that
> one.
> 
> At a guess, maybe you want something like this code. Or maybe not...
> 
> if ($alternate_site) {
> $port = 'k';
> } else {
> $port = 'a';
> }
> 
> Good luck with it!
> 
> --Tom Phoenix
> Stonehenge Perl Training
> 
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>  
> 
> 

-- 

Marilyn E. Sander[EMAIL PROTECTED]
Database (CM) Engineer   Phone  (408)616-5651
 internal 45651

 ~
 NOTICE: This email message is for the sole use of the intended
 recipient(s) and may contain confidential and privileged
 information. Any unauthorized review, use, disclosure or
 distribution is prohibited. If you are not the intended recipient,
 please contact the sender by reply email and destroy all copies
 of the original message.
 ~


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
 

Re: HI Can u help me

[zentara]

On Sun, 6 Oct 2002 14:18:53 -0300, [EMAIL PROTECTED] ([EMAIL PROTECTED]) wrote:

>Hello Is there a function to test if a given.jpg file is a valid jpg file? thanks

You can use the "ping" method of Image:Majick and test whether
it gives an error.
##
#!/usr/bin/perl -w
use Image::Magick;

my $x = $ARGV[0];
my $image;
$image = Image::Magick->new;

($width, $height, $size, $format) = $image->Ping($x); 
print $width,"\n", $height,"\n" ,$size,"\n", $format,"\n";
#


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Re: HI Can u help me

[david]

[EMAIL PROTECTED] wrote:

> Hello Is there a function to test if a given.jpg file is a valid jpg file?
> thanks

if you don't want to install/load another module, try:

#!/usr/bin/perl -w
use strict;

if(is_jpeg('your file')){
print "it's a valie jpeg\n";
}else{
print "doesn't look like a jpeg\n";
}

sub is_jpeg{
my $jpeg_file = shift;
my $id = undef;
open(JPEG,$jpeg_file) || croak("Unable to open $jpeg_file: $!");
sysread(JPEG,$id,6);
sysread(JPEG,$id,5);
my($j,$p,$e,$g,$z) = unpack("C",$id);
close(JPEG);
return  $j == 74 && $p == 70 && $e == 73 && $g == 70 && $z == 0;
}

__END__

david


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]