Socket Programming with Perl

2007-08-20 Thread Saran . j . jegan
Hello, Do any suggest me successful module for socket communication in perl under windows environment and some prerequisite for it. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Socket Programming with Perl

2007-08-20 Thread Gunnar Hjalmarsson
[EMAIL PROTECTED] wrote: Do any suggest me successful module for socket communication in perl under windows environment and some prerequisite for it. http://search.cpan.org/search?query=socket -- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl -- To

File::Find

2007-08-20 Thread Somu
How do i use it? Can it replace the search program in MS XP.. Can i get an example of an element in the @directories -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

modification

2007-08-20 Thread Ken Foskey
I have a piece of code that I am assured works and I cannot see why it would. Code is supposed to force undefined, zero and all space to numeric zero to stop printf being undefined. foreach my $value (@array) { if( ! $value or $value =) { $value = 0; } } Will this

Re: modification

2007-08-20 Thread Paul Johnson
On Tue, Aug 21, 2007 at 12:47:22AM +1000, Ken Foskey wrote: I have a piece of code that I am assured works and I cannot see why it would. Code is supposed to force undefined, zero and all space to numeric zero to stop printf being undefined. foreach my $value (@array) { if( ! $value

Re: modification

2007-08-20 Thread Chas Owens
On 8/20/07, Ken Foskey [EMAIL PROTECTED] wrote: I have a piece of code that I am assured works and I cannot see why it would. Code is supposed to force undefined, zero and all space to numeric zero to stop printf being undefined. foreach my $value (@array) { if( ! $value or $value =

Re: modification

2007-08-20 Thread Chris Charley
- Original Message - From: Ken Foskey [EMAIL PROTECTED] Newsgroups: perl.beginners To: beginners perl beginners@perl.org Sent: Monday, August 20, 2007 10:47 AM Subject: modification I have a piece of code that I am assured works and I cannot see why it would. Code is supposed to

Re: modification

2007-08-20 Thread Paul Lalli
On Aug 20, 10:47 am, [EMAIL PROTECTED] (Ken Foskey) wrote: I have a piece of code that I am assured works Assured by whom? and I cannot see why it would. It doesn't. Code is supposed to force undefined, zero and all space to numeric zero to stop printf being undefined. foreach my

Re: File::Find

2007-08-20 Thread Martin Barth
On Fri, 17 Aug 2007 07:48:33 -0700 [EMAIL PROTECTED] (Randal L. Schwartz) wrote: Why not just: my @list; find sub { push @list, $File::Find::name }, /var/SAMPLES; HTH -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: modification

2007-08-20 Thread Gunnar Hjalmarsson
Ken Foskey wrote: I have a piece of code that I am assured works and I cannot see why it would. Code is supposed to force undefined, zero and all space to numeric zero to stop printf being undefined. foreach my $value (@array) { if( ! $value or $value =) {

Re: modification

2007-08-20 Thread Gunnar Hjalmarsson
Paul Lalli wrote: On Aug 20, 10:47 am, [EMAIL PROTECTED] (Ken Foskey) wrote: Is there a 'better' way to do this. Well, if you're sure you know what you're doing, you could just turn the warning off in the specific scope where you don't want it. I mean, it's a warning. If you're comfortable

Re: Socket Programming with Perl

2007-08-20 Thread Saran . j . jegan
On Aug 20, 12:12 pm, [EMAIL PROTECTED] (Saran j jegan) wrote: Hello, Do any suggest me successful module for socket communication in perl under windows environment and some prerequisite for it. There are dump of modules ,which might be the best one from yours experience, will be

Re: modification

2007-08-20 Thread Paul Lalli
On Aug 20, 11:51 am, [EMAIL PROTECTED] (Gunnar Hjalmarsson) wrote: Paul Lalli wrote: $array[0] = substr( $_, 256, 6 ); { no warnings 'numeric'; That would better be: no warnings qw/numeric uninitialized/; to cover undefined array elements. printf %06d, $array[0]; } if

Re: Socket Programming with Perl

2007-08-20 Thread Gunnar Hjalmarsson
[EMAIL PROTECTED] wrote: On Aug 20, 12:12 pm, [EMAIL PROTECTED] (Saran j jegan) wrote: Do any suggest me successful module for socket communication in perl under windows environment and some prerequisite for it. There are dump of modules ,which might be the best one from yours

Help needed with insignificant problem using format and write

2007-08-20 Thread Mathew Snyder
I run a script which creates a small report for different users of a system we have here at work. The report is a simple text document formated with, of all things, the format function. It uses a TOP to create a header for each of our customers which a user has worked with. For some reason the

Re: Help needed with insignificant problem using format and write

2007-08-20 Thread Paul Lalli
On Aug 20, 3:10 pm, [EMAIL PROTECTED] (Mathew Snyder) wrote: I run a script which creates a small report for different users of a system we have here at work. The report is a simple text document formated with, of all things, the format function. It uses a TOP to create a header for each of

Re: Help needed with insignificant problem using format and write

2007-08-20 Thread Mathew Snyder
Paul Lalli wrote: On Aug 20, 3:10 pm, [EMAIL PROTECTED] (Mathew Snyder) wrote: I run a script which creates a small report for different users of a system we have here at work. The report is a simple text document formated with, of all things, the format function. It uses a TOP to create

Re: Help needed with insignificant problem using format and write

2007-08-20 Thread Chas Owens
On 8/20/07, Mathew Snyder [EMAIL PROTECTED] wrote: Paul Lalli wrote: On Aug 20, 3:10 pm, [EMAIL PROTECTED] (Mathew Snyder) wrote: I run a script which creates a small report for different users of a system we have here at work. The report is a simple text document formated with, of

regex help

2007-08-20 Thread Tony Heal
I have an array that will have these values. Each value is part of a file name. I need to keep the highest (numerically) 5 files and delete the rest. What is the easiest to sort the array. 14-special.4-32 14-special.4-32 14-special.4-33 14-special.4-33 or 15-special.1-51

Re: regex help

2007-08-20 Thread Mr. Shawn H. Corey
Tony Heal wrote: I have an array that will have these values. Each value is part of a file name. I need to keep the highest (numerically) 5 files and delete the rest. What is the easiest to sort the array. Break each file name into fields and sort by most significant field to least. Use

Re: modification

2007-08-20 Thread Ken Foskey
Thanks all, I did read that about for loops somewhere new there was something. I wonder how many times I have corrupted stuff with the expectation of having a copy?* I always make that mistake 'if( $a = 10 ) {' that is why I always 'use warnings' and, most importantly, correct the code. Pet

Pet Peeves (WAS: modification)

2007-08-20 Thread Mr. Shawn H. Corey
Ken Foskey wrote: I always make that mistake 'if( $a = 10 ) {' that is why I always 'use warnings' and, most importantly, correct the code. Pet peeve is 'use warnings' and then not cleaning them up. That's because way back in grade school, you were taught that 'a = 10' (make a equal to ten)

pittsburgh perl

2007-08-20 Thread oryann9
Anyone from this list going? How much was it last year for entry? It does not say how much it is yet at http://pghpw.org/ppw2007/. :) Shape Yahoo! in your own image. Join our Network Research Panel

Re: modification

2007-08-20 Thread John W. Krahn
Ken Foskey wrote: Thanks all, I did read that about for loops somewhere new there was something. I wonder how many times I have corrupted stuff with the expectation of having a copy?* I always make that mistake 'if( $a = 10 ) {' that is why I always 'use warnings' and, most importantly,

entering regular expressions from the keyboard

2007-08-20 Thread Christopher Spears
Hi! I'm trying to get back into Perl again by working through Intermediate Perl. Unfortunately, the Perl part of my brain has atrophied! I'm working on the second exercise of the second chapter. I'm supposed to write a program that asks the user to type a regular expression. The program

Re: regex help

2007-08-20 Thread Jeff Pang
-Original Message- From: Tony Heal [EMAIL PROTECTED] Sent: Aug 21, 2007 5:50 AM To: beginners@perl.org Subject: regex help I have an array that will have these values. Each value is part of a file name. I need to keep the highest (numerically) 5 files and delete the rest. What is the

Re: entering regular expressions from the keyboard

2007-08-20 Thread Jeff Pang
-Original Message- From: Christopher Spears [EMAIL PROTECTED] Sent: Aug 21, 2007 11:28 AM To: beginners@perl.org Subject: entering regular expressions from the keyboard Hi! I'm trying to get back into Perl again by working through Intermediate Perl. Unfortunately, the Perl part of my

Re: regex help

2007-08-20 Thread Mr. Shawn H. Corey
Jeff Pang wrote: use strict; use warnings; my @arr = qw(14-special.4-32 14-special.4-32 14-special.4-33 14-special.4-33 15-special.1-51 15-special.1-51 15-special.1-52 15-special.1-52 15-special.1-52 15-special.1-53 15-special.1-53 15-special.1-53 15-special.1-54 15-special.1-54 15-special.3-44

Re: entering regular expressions from the keyboard

2007-08-20 Thread Mr. Shawn H. Corey
Christopher Spears wrote: Hi! I'm trying to get back into Perl again by working through Intermediate Perl. Unfortunately, the Perl part of my brain has atrophied! I'm working on the second exercise of the second chapter. I'm supposed to write a program that asks the user to type a regular

Re: regex help

2007-08-20 Thread Jeff Pang
-Original Message- From: Mr. Shawn H. Corey [EMAIL PROTECTED] Sent: Aug 21, 2007 12:32 PM To: Jeff Pang [EMAIL PROTECTED] Cc: beginners@perl.org Subject: Re: regex help Jeff Pang wrote: use strict; use warnings; my @arr = qw(14-special.4-32 14-special.4-32 14-special.4-33