comparing kit names

2008-05-05 Thread perl_learner
Hi, I have these type of kits in unix location. aaa.t.z aaa_d.t.z bbb.t.z bbb_d.t.z ccc.t.z ccc_d.t.z ddd.t.z eee.t.z (there will be more numbers). I have to come up with idea, so that , it compares for each *.t.z kit in that location, that it has the corresponding *_d.t.z. If any *.t.z doesn't

Re: how to simplify this script

2008-05-05 Thread Gunnar Hjalmarsson
Richard Lee wrote: It should include '1 2 3' because '1 2 3', '1 2 4', '1 2 7', '1 2 8', '1 2 9' = '1 2'(the common number from the list) + anynumber. as any of them contains 1 and 2 and I don't understand why '1 2 3' was picked. My interpretation: Because it's the first element of those

Re: comparing kit names

2008-05-05 Thread Gunnar Hjalmarsson
perl_learner wrote: Hi, I have these type of kits in unix location. aaa.t.z aaa_d.t.z bbb.t.z bbb_d.t.z ccc.t.z ccc_d.t.z ddd.t.z eee.t.z (there will be more numbers). I have to come up with idea, so that , it compares for each *.t.z kit in that location, that it has the corresponding

Re: generating number ranges using rand function

2008-05-05 Thread Rob Dixon
John W. Krahn wrote: Aruna Goke wrote: I have worked on the code below and am able to generate the 15digit lenght required . However, what i wish to achieve is to make sure all the output comes out in 15 digits each. a sample of my output is as below. Can someone guide on how to make all

Writing side of square

2008-05-05 Thread Rodrigo Tavares
Hello, I need create a square using a single number, but I don't know how to create the sides. I have to create this: * * * * My code is below : print Enter with number:; chomp ($number = STDIN); my @array = (); $cont = 0; while ($numero $cont) { $array[$cont]=*;

Re: Writing side of square

2008-05-05 Thread Jerald Sheets
The perl module Graphics::Simple might be able to help you. Found on CPAN. --jms On May 5, 2008, at 9:22 AM, Rodrigo Tavares wrote: Hello, I need create a square using a single number, but I don't know how to create the sides. I have to create this: * * * * My code is

RE: Writing side of square

2008-05-05 Thread Thomas Bätzler
Rodrigo Tavares [EMAIL PROTECTED] asked: I need create a square using a single number, but I don't know how to create the sides. #!/usr/bin/perl -w use strict; for( my $n = 1 ; $n = 10; $n++ ){ print \nn = $n\n\n; if( $n == 1 ){ print *\n; } else { print '*'x$n . \n; for(

Re: Comparing files with regular expressions

2008-05-05 Thread Aaron Rubinstein
Given just the idea of the data, can you improve on that? I bet I could! It's interesting how my instinct, when trying to develop a programming solution, is to wrestle with the problem inside the context of the language. As a result, the solutions I come up with tend to be shaped by my limited

Re: Comparing files with regular expressions

2008-05-05 Thread Rob Dixon
Aaron Rubinstein wrote: Given just the idea of the data, can you improve on that? I bet I could! I bet you could too :) It's interesting how my instinct, when trying to develop a programming solution, is to wrestle with the problem inside the context of the language. As a result, the

Re: Writing side of square

2008-05-05 Thread Rob Dixon
Rodrigo Tavares wrote: Hello, I need create a square using a single number, but I don't know how to create the sides. I have to create this: * * * * My code is below : print Enter with number:; chomp ($number = STDIN); my @array = (); $cont = 0; while

Re: Writing side of square

2008-05-05 Thread Stephen Kratzer
On Monday 05 May 2008 09:22:51 Rodrigo Tavares wrote: Hello, I need create a square using a single number, but I don't know how to create the sides. I have to create this: * * * * My code is below : print Enter with number:; chomp ($number = STDIN); my @array = ();

Re: IDE for Perl in Linux

2008-05-05 Thread Daniel Kasak
On Fri, 2008-05-02 at 08:04 -0700, Rodrigo Tavares wrote: Hello, Today I write my perls scripts with a simple editor. I found this link http://www.enginsite.com/Perl.htm, but it run only in Windows. This link http://www.solutionsoft.com/perl.htm, contain the for linux, but have to

Re: Writing side of square

2008-05-05 Thread Chas. Owens
On Mon, May 5, 2008 at 11:18 AM, Stephen Kratzer [EMAIL PROTECTED] wrote: snip for (1..$n) { if ($_ == 1 || $_ == $n) { print * x $n, \n; } else { print *, x ($n - 2), *\n; } } snip Its time to play TIMTOWTDI:

Re: how to reun perl script on other pc without having to install perl

2008-05-05 Thread David Nicholas Kayal
Yes, have you heard of a product called perltoexe by activestate? On Sun, 4 May 2008 [EMAIL PROTECTED] wrote: Hi, What must I do to my perl script so that my friends can run my perl script from their computer, using windows as the operating system, without having to install perl into their

Re: how to reun perl script on other pc without having to install perl

2008-05-05 Thread Jenda Krynicky
From: David Nicholas Kayal [EMAIL PROTECTED] Yes, have you heard of a product called perltoexe by activestate? On Sun, 4 May 2008 [EMAIL PROTECTED] wrote: Hi, What must I do to my perl script so that my friends can run my perl script from their computer, using windows as the operating

Re: how to simplify this script

2008-05-05 Thread Richard Lee
Gunnar Hjalmarsson wrote: Richard Lee wrote: It should include '1 2 3' because '1 2 3', '1 2 4', '1 2 7', '1 2 8', '1 2 9' = '1 2'(the common number from the list) + anynumber. as any of them contains 1 and 2 and I don't understand why '1 2 3' was picked. My interpretation: Because it's the