Re: Perl help

2012-04-07 Thread timothy adigun
Hi Om, In addition to what Rob wrote: On Tue, Apr 3, 2012 at 10:38 AM, Om Prakash oomprak...@gmail.com wrote: Hi all, I have some data which is like A:12 B:13 C: 14 Now the data is line by line and multiple line with A B C is common though 12 13 14 is changing, i want to take this

Re: Perl help

2012-04-07 Thread Torqued
Regards.../om On 07-Apr-2012, at 15:28, timothy adigun 2teezp...@gmail.com wrote: Hi Om, In addition to what Rob wrote: On Tue, Apr 3, 2012 at 10:38 AM, Om Prakash oomprak...@gmail.com wrote: Hi all, I have some data which is like A:12 B:13 C: 14 Now the data is line by

Re: Perl help

2012-04-07 Thread timothy adigun
Hi Torqued, On Sat, Apr 7, 2012 at 2:20 PM, Torqued torque.in...@gmail.com wrote: Regards.../om On 07-Apr-2012, at 15:28, timothy adigun 2teezp...@gmail.com wrote: Hi Om, In addition to what Rob wrote: On Tue, Apr 3, 2012 at 10:38 AM, Om Prakash oomprak...@gmail.com wrote:

Perl help

2012-04-05 Thread Om Prakash
Hi all, I have some data which is like A:12 B:13 C: 14 Now the data is line by line and multiple line with A B C is common though 12 13 14 is changing, i want to take this data column wise, and the the value should come under A B C. Any help will be appreciated. Regards.../om -- To

Re: Perl help

2012-04-05 Thread Rob Coops
On Tue, Apr 3, 2012 at 11:38 AM, Om Prakash oomprak...@gmail.com wrote: Hi all, I have some data which is like A:12 B:13 C: 14 Now the data is line by line and multiple line with A B C is common though 12 13 14 is changing, i want to take this data column wise, and the the value should

Re: perl help

2011-09-09 Thread Chris Stinemetz
What would be the best way to omit any record when varible $dist is null or not  1 ? But from your code, I assume you mean to omit records when the _length_ of $dist isn't greater than one? I would make the check immediately $dest is assigned, and 'next' over the record in the same way as

Re: perl help

2011-09-09 Thread Shlomi Fish
Hi Chris, thanks for not top-posting. See below for my response. On Fri, 9 Sep 2011 03:54:14 -0500 Chris Stinemetz chrisstinem...@gmail.com wrote: What would be the best way to omit any record when varible $dist is null or not  1 ? But from your code, I assume you mean to omit records

Re: perl help

2011-09-09 Thread Paul Johnson
On Fri, Sep 09, 2011 at 12:11:04PM +0300, Shlomi Fish wrote: next if (!length($dist) or !length($cell) or !length($sect)); There's a better way using List::MoreUtils : For some definition of better. See also De Morgan. -- Paul Johnson - p...@pjcj.net http://www.pjcj.net -- To

Re: perl help

2011-09-09 Thread Shlomi Fish
Hi, On Fri, 9 Sep 2011 11:28:19 +0200 Paul Johnson p...@pjcj.net wrote: On Fri, Sep 09, 2011 at 12:11:04PM +0300, Shlomi Fish wrote: next if (!length($dist) or !length($cell) or !length($sect)); There's a better way using List::MoreUtils : For some definition of better. Well,

Re: perl help

2011-09-09 Thread Shawn H Corey
On 11-09-09 05:11 AM, Shlomi Fish wrote: next if (any { !length($_) } $dist, $cell, $sect); I would prefer: next if (any { length($_) == 0 } $dist, $cell, $sect); This makes it clearer as to exactly what condition is being tested, a zero-length string. -- Just my 0.0002

Re: perl help

2011-09-09 Thread Rob Dixon
On 09/09/2011 09:54, Chris Stinemetz wrote: What would be the best way to omit any record when varible $dist is null or not1 ? But from your code, I assume you mean to omit records when the _length_ of $dist isn't greater than one? I would make the check immediately $dest is assigned,

Re: perl help

2011-09-09 Thread Mike McClain
Hi Chris, To debug your code simplify it as much as possible to include only the parts that aren't working right which means copy the file to a temporary working file (I usually call mine t.pl) and delete the stuff that's superflous. In your case that would be reading and writing files and

Re: perl help

2011-09-09 Thread John W. Krahn
Chris Stinemetz wrote: What would be the best way to omit any record when varible $dist is null or not1 ? But from your code, I assume you mean to omit records when the _length_ of $dist isn't greater than one? I would make the check immediately $dest is assigned, and 'next' over the

perl help

2011-09-08 Thread Chris Stinemetz
What would be the best way to omit any record when varible $dist is null or not 1 ? I am not sure my attempt is correct with the ternary operator with length function. It seems that $dist is just being assinged 0 when the expression $dist is not 1. Any help is greatly appreciated. Thank you,

Re: perl help

2011-09-08 Thread Rob Dixon
On 08/09/2011 20:58, Chris Stinemetz wrote: What would be the best way to omit any record when varible $dist is null or not 1 ? I am not sure my attempt is correct with the ternary operator with length function. It seems that $dist is just being assinged 0 when the expression $dist is not 1.

Re: please Perl help...

2011-09-04 Thread Shlomi Fish
ׁHi Charith, On Fri, 2 Sep 2011 20:42:31 -0700 (PDT) Charith LokuBogahawatta charith...@gmail.com wrote: Hi All, I'm new to this group also for perl but nowadays I working around with Perl and I need some help. this my first thread please anyone can help me? i have a file contains the

Re: please Perl help...

2011-09-04 Thread Parag Kalra
use strict; use warnings; while(DATA){ my $num = $. - 1; s/\d+/$num/ if /\w+\s+\d+\s+\w/; print $_; } __DATA__ charith 4 matara saman 8 kandy andrew 9 colombo dilshan 3 galle shanil 10 jafna Parag On Fri, Sep 2, 2011 at 8:42 PM, Charith LokuBogahawatta charith...@gmail.com wrote:

Re: please Perl help...

2011-09-04 Thread Uri Guttman
PK == Parag Kalra paragka...@gmail.com writes: PK use strict; PK use warnings; PK while(DATA){ PK my $num = $. - 1; PK s/\d+/$num/ if /\w+\s+\d+\s+\w/; there is no need for the if as you can just do a s/// directly. and it can do the num part as well.

Re: please Perl help...

2011-09-04 Thread Shlomi Fish
Hi Parag, a few comments on your code. On Sat, 3 Sep 2011 23:38:31 -0700 Parag Kalra paragka...@gmail.com wrote: use strict; use warnings; while(DATA){ You should expect the contents of the file to be in a different place than __DATA__, so one should use open or *ARGV or whatever here.

please Perl help...

2011-09-03 Thread Charith LokuBogahawatta
Hi All, I'm new to this group also for perl but nowadays I working around with Perl and I need some help. this my first thread please anyone can help me? i have a file contains the following data. charith 4 matara saman 8 kandy andrew 9 colombo dilshan 3 galle shanil 10 jafna . . . Here I

Compare, diff to a file with Perl help needed

2008-10-20 Thread Z W
Hi I have 2 log files, each with a timestamp on the first 2 fields. However, when I do a awk '/ / {print $1,$2}' logs/x.log on a log file, it is complicated by the fact that I also get other non timestamp column, 2008-10-20 15:00:06,113 2008-10-20 15:00:06,113 2008-10-20 14:59:48,828

Perl Help With Strings

2007-08-18 Thread mihirtr
Hi, I have trying see if it is possible using perl to do following. I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in local file or output it. For

Re: Perl Help With Strings

2007-08-18 Thread Chas Owens
On 8/17/07, [EMAIL PROTECTED] [EMAIL PROTECTED] wrote: snip I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in local file or output it. For

Re: Perl Help With Strings

2007-08-18 Thread Dr.Ruud
[EMAIL PROTECTED] schreef: I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in local file I would use (not Perl but) the preprocessor for that.

Re: Perl Help With Strings

2007-08-18 Thread Chas Owens
On 8/18/07, Dr.Ruud [EMAIL PROTECTED] wrote: [EMAIL PROTECTED] schreef: I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in local file I

Re: Perl Help With Strings

2007-08-18 Thread Dr.Ruud
Chas Owens schreef: Dr.Ruud: mihirtr: I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in local file I would use (not Perl but) the

Re: Perl Help With Strings

2007-08-18 Thread Chas Owens
On 8/18/07, Dr.Ruud [EMAIL PROTECTED] wrote: Chas Owens schreef: Dr.Ruud: mihirtr: I have multiple C/C++ files which I need to go manually and find out specific function call. I want to check 2nd parameter of this function (Function_To_Look_For) and get value of it and store it in

Re: Perl help

2006-07-18 Thread Owen Cook
On Tue, 18 Jul 2006, Sayed, Irfan (Irfan) wrote: I am executing following code foreach (@vob_list) { my @repl = `$CT lsreplica -invob $_ | grep cmvobsvr1mum`; print @repl; } but i am not getting proper output for grep It is probably looking for the system grep. Try

RE: Perl help

2006-07-18 Thread Sayed, Irfan \(Irfan\)
tried. but still same error. regards irfan. -Original Message- From: Owen Cook [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 18, 2006 12:11 PM To: Sayed, Irfan (Irfan) Cc: beginners@perl.org Subject: Re: Perl help On Tue, 18 Jul 2006, Sayed, Irfan (Irfan) wrote: I am executing

RE: Perl help

2006-07-18 Thread Jeff Peng
foreach (@vob_list) { my @repl = `$CT lsreplica -invob $_ | grep cmvobsvr1mum`; print @repl; } Could you use perl's grep instead?Like: for (@vob_list){ my @repl = `$CT lsreplica -invob $_`; my @repl2 = grep { /cmvobsvr1mum/ } @repl; print @repl2; } -- To unsubscribe,

RE: Perl help

2006-07-18 Thread Owen Cook
On Tue, 18 Jul 2006, Sayed, Irfan (Irfan) wrote: tried. but still same error. On Tue, 18 Jul 2006, Sayed, Irfan (Irfan) wrote: I am executing following code foreach (@vob_list) { my @repl = `$CT lsreplica -invob $_ | grep cmvobsvr1mum`; print @repl; }

RE: Perl help

2006-07-18 Thread Sayed, Irfan \(Irfan\)
Regards Irfan. -Original Message- From: Jeff Peng [mailto:[EMAIL PROTECTED] Sent: Tuesday, July 18, 2006 12:31 PM To: Sayed, Irfan (Irfan); beginners@perl.org Subject: RE: Perl help foreach (@vob_list) { my @repl = `$CT lsreplica -invob $_ | grep cmvobsvr1mum`; print @repl

RE: Perl help

2006-07-18 Thread Jeff Peng
my @repl2 = grep { /cmvobsvr1mum/ } @repl /tmp/log ; Hi,that should not work certainly,:) You could open a file and optain a filehandle and write to this filehandle. for example: open FILE,,$filename or die $!; print FILE @repl2; close FILE; -- To unsubscribe, e-mail:

Perl help

2006-07-17 Thread Sayed, Irfan \(Irfan\)
Hi , I am executing following code foreach (@vob_list) { my @repl = `$CT lsreplica -invob $_ | grep cmvobsvr1mum`; print @repl; } but i am not getting proper output for grep can anybody plz help me Regards Irfan.

perl help

2006-04-25 Thread Praveena Vittal
Hi All, I am newbie of perl joined in this group last month.I could like to know how could i develop my perl programming and my opinion is only reading the materials , and other documents related to perl does not matters.Is there any other way that makes me better in perl like

Re: perl help

2006-04-25 Thread Mr. Shawn H. Corey
On Tue, 2006-25-04 at 21:09 -0700, Praveena Vittal wrote: Hi All, I am newbie of perl joined in this group last month.I could like to know how could i develop my perl programming and my opinion is only reading the materials , and other documents related to perl does not matters.Is

Re: perl help

2006-04-25 Thread Mazhar
On 4/26/06, Praveena Vittal [EMAIL PROTECTED] wrote: Hi All, I am newbie of perl joined in this group last month.I could like to know how could i develop my perl programming and my opinion is only reading the materials , and other documents related to perl does not matters.Is there any

perl help

2006-04-18 Thread Irfan J Sayed
Hi, I am executing following command my $cp = dircopy(D:\\vobs,D:\\backup); if ($cp == 0) { print Copied successfuly\n; } else { print Copying failed\n; } But in variable $cp proper value is not coming .Either it should come as 0 or1 but it's coming as any junk value or no. can

Re: dircopy Was: perl help

2006-04-18 Thread Bjørge Solli
Please use more descriptive sibjects! On Tuesday 18 April 2006 11:47, Irfan J Sayed wrote: my $cp = dircopy(D:\\vobs,D:\\backup); if ($cp == 0) unless($cp) # this will execute the first block if $cp is empty { print Copied successfuly\n; } else { print Copying failed\n; }

Re: perl help

2006-04-18 Thread Chad Perrin
On Tue, Apr 18, 2006 at 03:17:15PM +0530, Irfan J Sayed wrote: my $cp = dircopy(D:\\vobs,D:\\backup); if ($cp == 0) { print Copied successfuly\n; } else { print Copying failed\n; } But in variable $cp proper value is not coming .Either it should come as 0 or1 but it's

Re: dircopy Was: perl help

2006-04-18 Thread JupiterHost.Net
Bjørge Solli wrote: Please use more descriptive sibjects! I second that ;p And more info on where you're gettign reandom functions from :) [snip] But in variable $cp proper value is not coming .Either it should come as 0 or1 but it's coming as any junk value or no. Where in the

Re: perl help

2006-04-18 Thread Chas Owens
On 4/18/06, Irfan J Sayed [EMAIL PROTECTED] wrote: snip can anybody plz tell me what i am doing wrong snip What you are doing wrong is making assumptions and not reading the documentation. This is being compounded by your inexperience with Perl. First let us tackle the Perl ignorance: true and

Re: perl help

2006-04-18 Thread John W. Krahn
Chas Owens wrote: On 4/18/06, Irfan J Sayed [EMAIL PROTECTED] wrote: snip can anybody plz tell me what i am doing wrong snip What you are doing wrong is making assumptions and not reading the documentation. This is being compounded by your inexperience with Perl. First let us tackle

Re: perl help

2006-04-18 Thread Chad Perrin
On Tue, Apr 18, 2006 at 02:39:35PM -0700, John W. Krahn wrote: Chas Owens wrote: On 4/18/06, Irfan J Sayed [EMAIL PROTECTED] wrote: snip can anybody plz tell me what i am doing wrong snip What you are doing wrong is making assumptions and not reading the documentation. This is

Re: perl help

2006-04-18 Thread Chas Owens
On 4/18/06, John W. Krahn [EMAIL PROTECTED] wrote: Chas Owens wrote: On 4/18/06, Irfan J Sayed [EMAIL PROTECTED] wrote: snip can anybody plz tell me what i am doing wrong snip What you are doing wrong is making assumptions and not reading the documentation. This is being compounded

Re: perl help

2006-04-18 Thread Dr.Ruud
John W. Krahn schreef: Perl actually has four false values: 0, undef, '' and '0'. One being the number zero and another a string with a single zero character. And the value '0' has many different representations in source, like \x30. -- Affijn, Ruud Gewoon is een tijger. -- To

Re: perl help

2006-04-18 Thread John W. Krahn
Dr.Ruud wrote: John W. Krahn schreef: Perl actually has four false values: 0, undef, '' and '0'. One being the number zero and another a string with a single zero character. And the value '0' has many different representations in source, like \x30. Assuming your source is ASCII or some

Re: perl help

2006-04-18 Thread Chas Owens
On 4/18/06, John W. Krahn [EMAIL PROTECTED] wrote: snip Assuming your source is ASCII or some other encoding that equates \x30 to '0'. snip Don't the newer versions of perl assume the character set is UTF-8? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: perl help

2006-04-18 Thread Mr. Shawn H. Corey
On Tue, 2006-18-04 at 19:11 -0400, Chas Owens wrote: On 4/18/06, John W. Krahn [EMAIL PROTECTED] wrote: snip Assuming your source is ASCII or some other encoding that equates \x30 to '0'. snip Don't the newer versions of perl assume the character set is UTF-8? Yes but in UTF-8, '0'

Re: perl help

2006-04-18 Thread Chas Owens
On 4/18/06, Mr. Shawn H. Corey [EMAIL PROTECTED] wrote: snip Yes but in UTF-8, '0' is \x{30} or \x{0030}. (The newer versions of Perl being 5.8+) snip That was my point. That assuming \x30 is the character '0' is now safe since all source code is interpreted as UTF-8. Is input from files

Re: perl help

2006-04-18 Thread Mr. Shawn H. Corey
On Tue, 2006-18-04 at 19:34 -0400, Chas Owens wrote: On 4/18/06, Mr. Shawn H. Corey [EMAIL PROTECTED] wrote: snip Yes but in UTF-8, '0' is \x{30} or \x{0030}. (The newer versions of Perl being 5.8+) snip That was my point. That assuming \x30 is the character '0' is now safe since all

RE: perl help : escape character

2006-04-06 Thread Raymond Raj
-Original Message- From: Irfan J Sayed [mailto:[EMAIL PROTECTED] Sent: Thursday, April 06, 2006 11:29 AM To: beginners@perl.org Subject: perl help : escape character Hi All, I am running following clearcase command my @activity = `$CT lsactivity -short -invob \Irfan_Test

RE: perl help : escape character

2006-04-06 Thread Irfan J Sayed
Thanks raymond . it's working now. Regards Irfan Sayed Raymond Raj [EMAIL PROTECTED] 04/06/2006 11:23 AM Please respond to [EMAIL PROTECTED] To Irfan J Sayed/India/[EMAIL PROTECTED], beginners@perl.org cc Subject RE: perl help : escape character -Original Message- From

perl help

2006-04-06 Thread Irfan J Sayed
Hi all, I am running following clearcase command in perl my @vob_list = `cleartool lsvob -short c:\\vob_list.txt`; I am getting output in c:\vob_list.txt file but not in the @vob_list array can anybody plz help me out in this regard Regards Irfan Sayed

Re: perl help

2006-04-06 Thread JupiterHost.Net
Irfan J Sayed wrote: Hi all, Hello, I am running following clearcase command in perl my @vob_list = `cleartool lsvob -short c:\\vob_list.txt`; I am getting output in c:\vob_list.txt file but not in the @vob_list array Your redirecting the output to the file, so its not going to

Perl help

2006-04-05 Thread Irfan J Sayed
Hi, I have printed one statement in perl . now i want to print another statement on second line . i just wanted to know that what is the syntax in perl to go to the next line ? Plz let me know. Regards Irfan Sayed

Re: %Re: Perl help

2006-04-05 Thread Irfan J Sayed
Thanks david. Regards Irfan Sayed David Gama Rodrí­guez [EMAIL PROTECTED] 04/05/2006 10:37 PM To Irfan J Sayed/India/[EMAIL PROTECTED] cc beginners@perl.org Subject %Re: Perl help Irfan J Sayed wrote: Hi, I have printed one statement in perl . now i want to print another

Re: Perl help

2006-04-05 Thread Chas Owens
On 4/5/06, Irfan J Sayed [EMAIL PROTECTED] wrote: Hi, I have printed one statement in perl . now i want to print another statement on second line . i just wanted to know that what is the syntax in perl to go to the next line ? Plz let me know. Regards Irfan Sayed to get a new line use

Re: Perl help

2006-04-05 Thread Irfan J Sayed
Thanks Chas Regards Irfan Sayed Chas Owens [EMAIL PROTECTED] 04/05/2006 10:53 PM To Irfan J Sayed/India/[EMAIL PROTECTED] cc beginners@perl.org Subject Re: Perl help On 4/5/06, Irfan J Sayed [EMAIL PROTECTED] wrote: Hi, I have printed one statement in perl . now i want to print

perl help : escape character

2006-04-05 Thread Irfan J Sayed
Hi All, I am running following clearcase command my @activity = `$CT lsactivity -short -invob \Irfan_Test`; where \Irfan_Test is the vob tag but it is giving me following error. Unrecognized escape \I passed through at C:\irfan\TESTSE~1.PL line 31. The system cannot find the path specified.

Perl Help

2006-03-21 Thread Irfan J Sayed
Hi All, I have written following perl code use CQPerlExt; use Prima; use Prima::Application; use Prima::MsgBox; $sessionobj = $entity-GetSession(); $username = $session-GetUserLoginName(); Prima::MsgBox::message( You have entered: '$username', mb::Ok); but when i compile

RE: xml and perl help

2005-01-14 Thread Bob Showalter
johnny yu wrote: hello. i am new with perl and working on a program to sort and manage my dvds instead of using windows program. i export the windows data using built in function to make it xml, how can i read this with perl so i can put in mysql? i try xml::simple but it doesn't work.

Re: xml and perl help

2005-01-14 Thread Todd W
Johnny Yu [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED] hello. i am new with perl and working on a program to sort and manage my dvds instead of using windows program. i export the windows data using built in function to make it xml, how can i read this with perl so i can put

xml and perl help

2005-01-13 Thread johnny yu
hello. i am new with perl and working on a program to sort and manage my dvds instead of using windows program. i export the windows data using built in function to make it xml, how can i read this with perl so i can put in mysql? i try xml::simple but it doesn't work. can someone show me

perl help

2004-06-17 Thread jack jack
Hi All, I have 2 variables $last_accessed and $owner_line $last_accessed=: Last accessed 20-Apr-04.12:57:30 by [EMAIL PROTECTED]; $owner_line=Owner: opc_bld : rwx (all); -From $last_accessed i want the foll output in variables : $view_day=20 $view_month=Apr $view_year=04 -From

RE: perl help

2004-06-17 Thread Bob Showalter
jack jack wrote: Hi All, Hi. Use a meaningful subject. perl help is a given on this list. I have 2 variables $last_accessed and $owner_line $last_accessed=: Last accessed 20-Apr-04.12:57:30 by [EMAIL PROTECTED]; $owner_line=Owner: opc_bld : rwx (all); -From $last_accessed i

Re: Perl Help: Array Manipulation

2003-12-25 Thread u235sentinel
I'm a newbie to perl also. Been workign with it for a whole 2 weeks now. Actually.. make that 3 ::grinz:: Warning.. lengthy email below.. I beg forgiveness in advance :-) Ok. Here is what I did. #!/usr/bin/perl @array1[0..5] = 1; @total[0] = 0; for($i=0; $i4; $i++) { if($i == 0) {

Re: Perl Help: Array Manipulation

2003-12-25 Thread Randy W. Sims
On 12/25/2003 12:59 AM, Duong Nguyen wrote: Hello everyone, Sorry for the spam, I am new to Perl and am having a hard time manipulating arrays. Below is the sample code that I am working on: @array1[0..5] = 1; @total[0] = 0; for($i=0; $i4; $i++) { if($i == 0) { @total[$i] =

Re: Perl Help: Array Manipulation

2003-12-25 Thread Duong Nguyen
; @array1[1] = 1; @array1[2] = 1; This works well. - Original Message - From: u235sentinel To: Duong Nguyen ; [EMAIL PROTECTED] Sent: Thursday, December 25, 2003 2:40 AM Subject: Re: Perl Help: Array Manipulation I'm a newbie

Re: Perl Help: Array Manipulation

2003-12-25 Thread Randy W. Sims
On 12/25/2003 2:51 AM, Duong Nguyen wrote: From: Randy W. Sims On 12/25/2003 12:59 AM, Duong Nguyen wrote: Hello everyone, Sorry for the spam, I am new to Perl and am having a hard time manipulating arrays. Below is the sample code that I am working on: @array1[0..5] = 1;

RE: Perl Help: Array Manipulation

2003-12-25 Thread Charles K. Clarkson
Duong Nguyen [EMAIL PROTECTED] wrote: : : Thanks for the response. I discovered that it was my : @array1[0..5] =1; initialization. : So I manually allocated values to the array to see if it : would work, much to my surprise, the correct total was : being printed. Here's what I did: : :

RE: Perl Help: Array Manipulation

2003-12-25 Thread Charles K. Clarkson
u235sentinel [EMAIL PROTECTED] wrote: [snipped valiant attempt] : : So now you see on the left the sum of each container in the array. : : Ok.. I await the flogging. Someone is bound to have done a better job : explaining this. At least I can blame it on being up after : midnight ;-)

Re: Perl Help: Array Manipulation

2003-12-25 Thread John W. Krahn
Duong Nguyen wrote: Hello everyone, Hello, Sorry for the spam, Why do you think that this is spam? I am new to Perl and am having a hard time manipulating arrays. Below is the sample code that I am working on: You should have warnings and strictures enabled while you are developing

Re: Perl Help: Array Manipulation

2003-12-25 Thread u235sentinel
But wouldn't the original initilization also work? @array1[0..5] = 1; This seemed to populate the array just fine. Randy W. Sims wrote: On 12/25/2003 2:51 AM, Duong Nguyen wrote: From: Randy W. Sims On 12/25/2003 12:59 AM, Duong Nguyen wrote: Hello everyone, Sorry for the

Re: Perl Help: Array Manipulation

2003-12-25 Thread R. Joseph Newton
u235sentinel wrote: I'm a newbie to perl also. Been workign with it for a whole 2 weeks now. Actually.. make that 3 ::grinz:: Warning.. lengthy email below.. I beg forgiveness in advance :-) Length isn't a problem. There are some problems here, though, because you are not addressing the

Re: Perl Help: Array Manipulation

2003-12-25 Thread u235sentinel
Understood. I guess I was trying to show him ( the senec route) that basically no running total was being compiled. Also that wasn't the total. I guess it was too late at night for a simple response from me :-) Charles K. Clarkson wrote: u235sentinel [EMAIL PROTECTED] wrote: [snipped

Re: Perl Help: Array Manipulation

2003-12-25 Thread Randy W. Sims
- From: Randy W. Sims To: Duong Nguyen Cc: [EMAIL PROTECTED] Sent: Thursday, December 25, 2003 3:02 AM Subject: Re: Perl Help: Array Manipulation On 12/25/2003 2:51 AM, Duong Nguyen wrote: From: Randy W. Sims On 12/25/2003 12:59 AM, Duong Nguyen wrote: Hello

Re: Perl Help: Array Manipulation

2003-12-25 Thread Randy W. Sims
On 12/25/2003 12:18 PM, u235sentinel wrote: But wouldn't the original initilization also work? @array1[0..5] = 1; No. Think of this in terms of parallel assignment, ignoring for the moment that we are talking of arrays, the above is equivalent to: ($e0, $e1, $e2, $e3, $e4, $e5) = 1; which is

Re: Perl Help: Array Manipulation

2003-12-25 Thread u235sentinel
Ahhh.. Ok. I see the mistake. I've purchased Oreilly's Learning Perl 3rd Edition and have been steadily plugging through it. There is an example on page 45 which shows another way to populate an array. Here is one such example they give. @numbers = 1..1e5; So basically if you didn't want

Perl Help: Array Manipulation

2003-12-24 Thread Duong Nguyen
Hello everyone, Sorry for the spam, I am new to Perl and am having a hard time manipulating arrays. Below is the sample code that I am working on: @array1[0..5] = 1; @total[0] = 0; for($i=0; $i4; $i++) { if($i == 0) { @total[$i] = @array1[$i]; print @total[$i];

Perl help needed LWP

2003-12-17 Thread Saleem Mukhtar
Hello, I am trying to use the Perl LWP and HTTP modules to communicate with the eBay API but I get the following message 500 Can't connect to api-test.ebay.com:443 (Bad protocol 'tcp') Can someone help?? I am including some code below -- I have blanked out userids and passwords. Please

Re: perl help needed

2003-07-06 Thread Mark Stosberg
In article [EMAIL PROTECTED], vemulakonda uday bhaskar wrote: hi all i have got a code for file transger between two linux systems through ssh here is the code Hello, This doesn't directly answer your question, but it may solve your problem. :) Have you considered just using passwordless

perl help needed

2003-07-03 Thread vemulakonda uday bhaskar
hi all i have got a code for file transger between two linux systems through ssh here is the code #!usr/bin/perl use Net::SSH qw(sshopen2); my $user=username; my $host=hostname; my $cmd=commanad; sshopen2([EMAIL PROTECTED],*REAEDR,*WRITER,$cmd) or die ssh :$!; while(READER) { chomp();

password encrytion perl help

2003-07-01 Thread vemulakonda uday bhaskar
hi all my code looks like this: #!/usr/bin/perl $ftp=Net::FTP-new(xxx.xxx.xxx.xxx) else die not connected; $u=STDIN; CHOMP $u; $p=STDIN; CHOMP $p; $ftp-login($u,$p) or die login failed; the code is working fine but the problem is when it asks password i need to give it , and so is visible to

Re: password encrytion perl help

2003-07-01 Thread Sudarshan Raghavan
vemulakonda uday bhaskar wrote: hi all my code looks like this: #!/usr/bin/perl $ftp=Net::FTP-new(xxx.xxx.xxx.xxx) else die not connected; $u=STDIN; CHOMP $u; $p=STDIN; CHOMP $p; $ftp-login($u,$p) or die login failed; the code is working fine but the problem is when it asks password i need to

Re: password encrytion perl help

2003-07-01 Thread Janek Schleicher
Vemulakonda Uday Bhaskar wrote at Tue, 01 Jul 2003 09:11:00 +: my code looks like this: #!/usr/bin/perl Missing use strict; use warnings; $ftp=Net::FTP-new(xxx.xxx.xxx.xxx) else die not connected; or $u=STDIN; CHOMP $u; ^ chomp

perl help ftp

2003-06-27 Thread vemulakonda uday bhaskar
hi all can anyone tell me from where i can download Net::FTP from www.cpan.org with regards uday bhaskar ___ Click below to experience Sooraj Barjatya's latest offering 'Main Prem Ki Diwani Hoon' starring Hrithik Roshan, Abhishek Bachchan Kareena

perl help ftp

2003-06-27 Thread vemulakonda uday bhaskar
hi all can anyone tell me from where i can download Net::FTP from www.cpan.org with regards uday bhaskar ___ Click below to experience Sooraj Barjatya's latest offering 'Main Prem Ki Diwani Hoon' starring Hrithik Roshan, Abhishek Bachchan Kareena

RE: perl help ftp

2003-06-27 Thread Darbesio Eugenio
-Original Message- vemulakonda uday bhaskar wrote: ... can anyone tell me from where i can download Net::FTP from www.cpan.org ... Browse to http://search.cpan.org/ then search for Net::FTP. E. CONFIDENTIALITY

Re: perl help ftp

2003-06-27 Thread Kevin Pfeiffer
Hi, In article [EMAIL PROTECTED], Vemulakonda Uday Bhaskar wrote: hi all can anyone tell me from where i can download Net::FTP from www.cpan.org with regards uday bhaskar (Your messages are being sent twice for some reason) After you've found the module, near the top of the page is a

scp : perl :help

2003-06-26 Thread vemulakonda uday bhaskar
hello all please tell me from where can i download scp modules for perl regards uday ___ Click below to experience Sooraj Barjatya's latest offering 'Main Prem Ki Diwani Hoon' starring Hrithik Roshan, Abhishek Bachchan Kareena Kapoor

RE: scp : perl :help

2003-06-26 Thread Sulabh Agarwal
I've always found the CPAN website of great help for any module. http://www.cpan.org/modules/00modlist.long.html sulabh -Original Message- From: vemulakonda uday bhaskar [mailto:[EMAIL PROTECTED] Sent: Thursday, June 26, 2003 8:40 AM To: [EMAIL PROTECTED] Subject: scp : perl :help

perl help!!

2003-03-29 Thread Jasmine
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 hi i m faced with a problem. i have a string set to an IP address and i want to be able to compare it with just the first three octets and see if it matches. How do i go about? I know regex can do it but the problem is i m a newbie to it. If anyone

RE: perl help!!

2003-03-29 Thread yargo
{ die Wrong IP address\n; } -Original Message- From: Jasmine [mailto:[EMAIL PROTECTED] Sent: Saturday, March 29, 2003 6:36 PM To: [EMAIL PROTECTED] Subject: perl help!! -BEGIN PGP SIGNED MESSAGE- Hash: SHA1 hi i m faced with a problem. i have a string set to an IP address

linux perl help

2003-03-13 Thread shine_perl
Hi all, In my site i want to restrict the view of a hyperlink document to the authorised people.But in mycase if one paste the url to that document in browser it will open that doc file.If i protect the directory by password protection using httpd.conf and htaccess files problem with the

RE: linux perl help

2003-03-13 Thread Dan Muey
Have you checked you path to perl? What do you mean that has nothing to do with the problem? Oh I'm sorry I thought this was a perl list! ;p Hi all, In my site i want to restrict the view of a hyperlink document to the authorised people.But in mycase if one paste the url to that

Re: Perl Help

2003-01-06 Thread Rob Dixon
Hi Adam You certainly seem to have got yourself confused :) I'm not certain what it is you're trying to do either. Remember the following: $xxxis a _scalar_ value, which will hold a single number, string etc. @xxxis an _array_ value, which will hold a list of scalar values

Re: Perl Help

2003-01-05 Thread simran
Adam, Not sure exactly what you are trying to do, but from what i gather... you don't want to say: @fieldprice 0 as that will put the array fieldprice in scalar contect, and give you back the number of elements in that array... Now Assuming: $fieldprice = 14.95 You should be able to

non perl help

2002-11-25 Thread pravesh biyani
Hi Guys The suggestion I would need now is related to perl only in the way that I have done the programming in Perl. Actually, I have written few scripts which I need to run between any two machines which are located far away from each other and having not too good

perl help

2002-07-11 Thread Javeed SAR
HI, i want to push the contents of array MSG (Given below) to a file call testblat.txt. so that i can assign as follows: $message = testblat.txt ; How to do it?? my MSG = (Trigger activation mail notification for controlled action on VOB

  1   2   >