Re: greater circle

2012-08-29 Thread Paul Anderson
That is 99.99780441116897988% error. 16 9's is better than any measuring instrument in existence. I think it'll do:) Paul Anderson -- VE3HOP On 2012-08-30, at 1:29 AM, Jim Gibson wrote: > > On Aug 29, 2012, at 5:53 PM, Chris Stinemetz wrote: > >> Just one question. If th

Re: greater circle

2012-08-29 Thread Jim Gibson
On Aug 29, 2012, at 5:53 PM, Chris Stinemetz wrote: > Just one question. If the two sets of coordinates are the same I was > expecting the distance to be 0 miles. > > Instead I get: > > 2.19558883102012e-013 > > For the following example. > > #!/usr/bin/perl > > use strict; > use warnings; >

Re: Encode::ConfigLocal module

2012-08-29 Thread John SJ Anderson
On Tuesday, August 28, 2012 at 11:42 PM, Irfan Sayed wrote: > i red the documentation but seems difficult > can u please list down the steps i need to follow > > will execute those steps and create the module > Please don't reply directly to me. Keeping the conversation on the mailing list ens

Re: how to handle two input files

2012-08-29 Thread John W. Krahn
timothy adigun wrote: On 8/29/12, John W. Krahn wrote: timothy adigun wrote: On 8/29/12, timothy adigun<2teezp...@gmail.com> wrote: for(my $i=0; $i<= length(@startSite)-1; $i++) { The above could be: for(my $i=0; $i<= scalar (@startSite); $i++) { ... for(my $i=0; $i

Re: greater circle

2012-08-29 Thread Chris Stinemetz
> > The Math::Trig routines all work with radians. Therefore, you are going to > have to convert your locations from degrees to radians. You can use the > Math::Trig::deg2rad function. Note that pi/2 is radians, so you are > subtracting degrees from radians, which never works. > > The great_circ

Re: how to handle two input files

2012-08-29 Thread Jim Gibson
On Aug 29, 2012, at 3:37 PM, timothy adigun wrote: > > > If the OP decides to use C style of for loop, this is CORRECT: > > for( my $i=1; $i <= scalar (@startSite); $i++ ){ ... Almost. That has a off-by-one error, as $i should not be equal to scalar(@startSite). I believe the following is

How do I arrange for Makefile.PL to create a modulino instance script?

2012-08-29 Thread David Christensen
beginners: I am working on a modulino [1] and would like to use ExtUtils::MakeMaker to generate a Makefile such that "make" (or "make all") copies the module file (lib/MyModulino.pm) to a script file (perl-bin/mymodulino.pl) and sets the execute bit. Any suggestions? TIA, David Refer

Re: how to handle two input files

2012-08-29 Thread timothy adigun
Hi, On 8/29/12, John W. Krahn wrote: > timothy adigun wrote: >> Hi, > > Hello, > >> On 8/29/12, timothy adigun<2teezp...@gmail.com> wrote: >> for(my $i=0; $i<= length(@startSite)-1; $i++) { >>> >>>The above could be: >>> for(my $i=0; $i<= scalar (@startSite); $i++) { >>>...

Re: how to handle two input files

2012-08-29 Thread Jim Gibson
On Aug 29, 2012, at 3:07 PM, Wang, Li wrote: > Hi, John > > With the modified script, I got it work, but get some warnings when running > through one file. > > Use of uninitialized value in numeric ge (>=) at searchAndPrint.pl line 50, > line 3417. > Use of uninitialized value in numeric g

Re: greater circle

2012-08-29 Thread Jim Gibson
On Aug 29, 2012, at 2:08 PM, Chris Stinemetz wrote: > Hello List, > > I'm tyring to find the distance in miles between two sets of > coordinates by using the module Math::Trig > > I'm expecting the return distance to be around 16.91 miles. > > Any help is greatly appriciated. > > Chris > > #

RE: how to handle two input files

2012-08-29 Thread Wang, Li
Hi, John With the modified script, I got it work, but get some warnings when running through one file. Use of uninitialized value in numeric ge (>=) at searchAndPrint.pl line 50, line 3417. Use of uninitialized value in numeric gt (>) at searchAndPrint.pl line 54, line 3417. Use of uniniti

Re: moving from 32bit to 64bit linux perl support?

2012-08-29 Thread Shawn H Corey
On Wed, 29 Aug 2012 14:36:53 -0700 (PDT) Rajeev Prasad wrote: > I have a lot of scripts written in perl on 32 bit ubuntu linux. i am > thinking to migrate to newer 64bit linux server, it will come with > perl package, but i am not sure whether there will be 64 bit modules > available? lets say fo

moving from 32bit to 64bit linux perl support?

2012-08-29 Thread Rajeev Prasad
Hello friends, I have a lot of scripts written in perl on 32 bit ubuntu linux. i am thinking to migrate to newer 64bit linux server, it will come with perl package, but i am not sure whether there will be 64 bit modules available? lets say for example for Net::Telnet will there be a 64bit versi

Perl difference in script name

2012-08-29 Thread Tim Lewis
I am using the name of my Perl script to call in an associated INI file with the same name. Someone ran across something today that I have not seen before. The server (Win 2003) on which the script runs has .pl files to be set with the Perl.exe as the default associated program. When I run a scr

Re: how to handle two input files

2012-08-29 Thread John W. Krahn
timothy adigun wrote: Hi, Hello, On 8/29/12, timothy adigun<2teezp...@gmail.com> wrote: for(my $i=0; $i<= length(@startSite)-1; $i++) { The above could be: for(my $i=0; $i<= scalar (@startSite); $i++) { ... for(my $i=0; $i<= scalar (@startSite); $i++) { ## Oops for(my

RE: DBD::ODBC SQL Server Stored Procedure

2012-08-29 Thread Gorrebeeck, Robert
Let me add one more bit of information I am calling another stored procedure from the original stored procedure. This is when I lose my values. If the account loc variable is Null I set the ErrorId -1 - and that gets returned to the perl script - it is when I call the CreateFeed stored procedure

greater circle

2012-08-29 Thread Chris Stinemetz
Hello List, I'm tyring to find the distance in miles between two sets of coordinates by using the module Math::Trig I'm expecting the return distance to be around 16.91 miles. Any help is greatly appriciated. Chris #!/usr/bin/perl use strict; use warnings; use Math::Trig qw(pi great_circle_di

RE: Perl Code

2012-08-29 Thread Tim Lewis
At least one Scooby snack? -Original Message- From: Jim Gibson [mailto:jimsgib...@gmail.com] Sent: Wednesday, August 29, 2012 12:59 PM To: Perl Beginners Subject: Re: Perl Code On Aug 29, 2012, at 9:46 AM, Ashwin Rao T wrote: > 1)Check if IP address is in the range 172.125.1.0 and 172.

Re: how to handle two input files

2012-08-29 Thread timothy adigun
Hi, On 8/29/12, timothy adigun <2teezp...@gmail.com> wrote: >> for(my $i=0; $i <= length(@startSite)-1; $i++) { > > The above could be: > for(my $i=0; $i <= scalar (@startSite); $i++) { > ... for(my $i=0; $i <= scalar (@startSite); $i++) { ## Oops for(my $i=0; $i <= scalar (@startS

Re: how to handle two input files

2012-08-29 Thread timothy adigun
Hi Wang, Li, Please, check my comments below. On 8/29/12, Wang, Li wrote: > Dear All > > I have two input files. I want to search an element of File1 in File 2. If > the condition matched, print out something. > File1: > scaffold_1_541600 0.856102487445412 0.295040551475357 > 0.

Re: DBD::ODBC SQL Server Stored Procedure

2012-08-29 Thread Leo Susanto
Full code please. On Wed, Aug 29, 2012 at 12:01 PM, Gorrebeeck, Robert wrote: > All > > I am having an issue with retrieving output parameters from a SQL Server > stored procedure. > > Here is the definition of the stored procedure > > PROCEDURE [TestProcess] > @Id NUMERIC(20,0), > @Ref

DBD::ODBC SQL Server Stored Procedure

2012-08-29 Thread Gorrebeeck, Robert
All I am having an issue with retrieving output parameters from a SQL Server stored procedure. Here is the definition of the stored procedure PROCEDURE [TestProcess] @Id NUMERIC(20,0), @RefID CHAR(36) OUTPUT, @ErrorIDINT OUTPUT And here is my perl code #bind the i

Re: Perl Code

2012-08-29 Thread John SJ Anderson
On Wednesday, August 29, 2012 at 9:46 AM, Ashwin Rao T wrote: > 1)Check if IP address is in the range 172.125.1.0 and 172.125.25.0 using only > return functions & regular expressions in Perl. > 2)Check if the name is valid (has atleast 3 letters and one vowel) using only > return functions and re

Re: Perl Code

2012-08-29 Thread Jim Gibson
On Aug 29, 2012, at 9:46 AM, Ashwin Rao T wrote: > 1)Check if IP address is in the range 172.125.1.0 and 172.125.25.0 using only > return functions & regular expressions in Perl. > 2)Check if the name is valid (has atleast 3 letters and one vowel) using only > return functions and regular expres

Perl Code

2012-08-29 Thread Ashwin Rao T
1)Check if IP address is in the range 172.125.1.0 and 172.125.25.0 using only return functions & regular expressions in Perl. 2)Check if the name is valid (has atleast 3 letters and one vowel) using only return functions and regular expressions in Perl. 3)Check if email address is valid using only

RE: how to handle two input files

2012-08-29 Thread Wang, Li
Dear All I got it work by moving #!/usr/bin/perl to the top. Thank you all! There is an error in my script. length(@startSite)-1 cannot give me the last element of the array. I changed it to $#startSite, and got the results what i want. Thank you again! Best regards Li ___