error in building perl module--hopefully not OT

2005-06-13 Thread Ron Smith
Hmmm..., I'm attempting to build and install a perl module on a Win XP box using the free version of "Borland C++ Builder 6". I seem to have run into a snag. Here are the particulars: perl Makefile.PL <--executed OK make<--seems to have executed OK, it gave the following in

Re: Best practice when using data from external files

2005-06-13 Thread Chris Devers
On Tue, 14 Jun 2005, Dale wrote: > Hi Chris Devers, you wrote: > > >On Mon, 13 Jun 2005, Dale wrote: > > > >> However, the server this currently sits on doesn't and won't ever (not > >> through choice) have any form of SQL so I'll just have to struggle > >> with the files. :) > > > >You miss the p

Re: Best practice when using data from external files

2005-06-13 Thread Dale
Hi Chris Devers, you wrote: On Mon, 13 Jun 2005, Dale wrote: However, the server this currently sits on doesn't and won't ever (not through choice) have any form of SQL so I'll just have to struggle with the files. :) You miss the point of SQLite then. You're right, I have. I assumed it w

Re: Net::SSH::Perl bind socket problem

2005-06-13 Thread gui
Thanks for your explanations MNibble, I'm still not sure what to do with fork, but now I have an idea of how it works. I finally got that problem solved!!! when executing the script as root the priviliged parameters is set to 1 by default. priviliged binds you to a specific port. In order to cha

Re: Best practice when using data from external files

2005-06-13 Thread Chris Devers
On Mon, 13 Jun 2005, Dale wrote: > However, the server this currently sits on doesn't and won't ever (not > through choice) have any form of SQL so I'll just have to struggle > with the files. :) You miss the point of SQLite then. With SQLite -- or the Perl interface, DBD::SQLite -- you're just

Re: Best practice when using data from external files

2005-06-13 Thread Dale
Hi Wiggins d'Anconia, you wrote: Fair points, I forget SQL::Lite since I wouldn't (need to) use it since I am already familar with the others. It sure would have been nice to have SQLite as a first step when I first learned :-). Though I still think if you have the time and desire to learn a dat

Re: Using Overload module

2005-06-13 Thread Jeff 'japhy' Pinyan
On Jun 13, Sapna Jain said: require two_face; $a = 18; if($a < 10) { my $n = new two_face ("vii", 7); } else { my $n = new two_face ("viii", 8); } print("string value = ".$n."\n"); printf "value=%d\n", 0+$n; The problem is that $n only eixsts inside those { } blocks of code. Do this ins

Re: Best practice when using data from external files

2005-06-13 Thread Wiggins d'Anconia
Chris Devers wrote: > On Mon, 13 Jun 2005, Wiggins d'Anconia wrote: > > >>If you are completely new to SQL/DBs then you might start with MySQL, >>though I would recommend going with PostgreSQL. > > > I wouldn't. > > PostgreSQL is good, but it's pretty complicated, and this problem isn't > yet.

Re: remove duplicate lines

2005-06-13 Thread John W. Krahn
Tielman Koekemoer (TNE) wrote: I'm also very new to Perl and wrote a long and newbyish script that does exactly what the Unix command "sort FILENAME | uniq" does just to see how it can be done. How long? Because you can do that on one line in perl. :-) Hi John (we're not worthy - Wa

Re: Best practice when using data from external files

2005-06-13 Thread Chris Devers
On Mon, 13 Jun 2005, Wiggins d'Anconia wrote: > If you are completely new to SQL/DBs then you might start with MySQL, > though I would recommend going with PostgreSQL. I wouldn't. PostgreSQL is good, but it's pretty complicated, and this problem isn't yet. No need to make it more complicated tha

Re: Best practice when using data from external files

2005-06-13 Thread Wiggins d'Anconia
Dale wrote: > Hi folks, > [snip] > > What would the best practice be in this case? > > Cheers! Switch to an RDBMS, period. Your model has grown beyond flat files, and having the full range of SQL relating, sorting, limiting, and selecting will serve you well from the description. It will also

Re: remove duplicate lines

2005-06-13 Thread John W. Krahn
Chris Devers wrote: Or the forthcoming, more up-to-date _Perl Best Practices_: Though in this case you'll have to wait until July or August for it to be released, but I have no doubt that it'll be worth the wait. Yes, anything by Dr. Conway will b

modifying the processed unicode value.

2005-06-13 Thread Rajarshi Das
Hi, This is on z/OS and perl-5.8.6. -- U8 u, *s; 1: s++; 2: u &= ((len >= 6) ? 0x01 : (0x1F >> (len-2))); 3: uv = (((u) << 5)|(PL_e2utf[(U8)(*s)] & ((U8)0x1f))); --- Before starting, s is set to "\x8a\x41" (utf-ebcdic byt

Sending SMS

2005-06-13 Thread Octavian Rasnita
Hello, Does anyone know if it is possible to create a program in perl which sends free SMS messages? I have tried using the module WWW::SMS but without success. It seems that it doesn't really work. Thank you. Teddy -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

RE: References

2005-06-13 Thread Bob Showalter
radhika wrote: > > You could do it like this: > > > > while (@row = fetchrow_array()) { > >push @$perl, { > > TRADE_DATE => $row[0], > > TRADE_TIME => $row[1], > > FIRSTNAME => $row[2], > > LASTNAME=> $row[3], > >

RE: References

2005-06-13 Thread radhika
> > You could do it like this: > > while (@row = fetchrow_array()) { >push @$perl, { > TRADE_DATE => $row[0], > TRADE_TIME => $row[1], > FIRSTNAME => $row[2], > LASTNAME=> $row[3], > EXCHANGE=> $

RE: remove duplicate lines

2005-06-13 Thread Chris Devers
On Mon, 13 Jun 2005, Thomas Bätzler wrote: > It also used to be part of a Book/CD set called the Perl Bookshelf. > AFAIK [_Perl Cookbook_ is] out of print but you might be able to pick > it up at a used book store (or onlinle at ABEbooks) cheaply. The first edition went out of print, but the seco

RE: References

2005-06-13 Thread Bob Showalter
radhika wrote: > Hi, > > I am trying to create this data structure as below: > > $perl = [ > { > fname => 'Fred', > lname => 'Flintstone', > residence => 'Bedrock' > }, > { > fname => '

References

2005-06-13 Thread radhika
Hi, I am trying to create this data structure as below: $perl = [ { fname => 'Fred', lname => 'Flintstone', residence => 'Bedrock' }, { fname => 'Barney', lname

Re: using open3 to interact with external program--ANSWER FOUND

2005-06-13 Thread D. J. Birkett
OK thanks to Zentara, my code now looks like... #!/usr/bin/perl use warnings; use strict; use IPC::Open3; local $SIG{CHLD} = 'IGNORE'; local $SIG{PIPE} = 'IGNORE'; my $childpid = open3(\*IN, \*OUT, \*ERR, 'gpg --no-greeting --no-tty --command-fd 0 --status-fd 1 --edit root'); print IN "tru

RE: remove duplicate lines

2005-06-13 Thread Thomas Bätzler
Tielman Koekemoer (TNE) <[EMAIL PROTECTED]> asked: > I've just come back to your post above (30/05/05) and I've > tried to get the internal workings of the code to agree with > my brain. Please help! > > > perl -e'print sort grep !$seen{$_}++, <>' FILENAME > > Initially I thought you were creat

Using Overload module

2005-06-13 Thread Sapna Jain
I am trying to use operator overloading in Perl. So, tried the example : require two_face; $a = 18; if($a < 10) { my $n = new two_face ("vii", 7); } else { my $n = new two_face ("viii", 8); } print("string value = ".$n."\n"); printf "value=%d\n", 0+$n; But, it cannot resolve the ove

RE: remove duplicate lines

2005-06-13 Thread Chris Devers
On Mon, 13 Jun 2005, Tielman Koekemoer (TNE) wrote: > PS Will the Perl Cookbook have examples to common tools such as this? Yes. Oodles of them. > What does everyone think of the book - very helpful? Extremely. -- Chris Devers -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional co

RE: remove duplicate lines

2005-06-13 Thread Tielman Koekemoer \(TNE\)
> > I'm also very new to Perl and wrote a long and newbyish script that > > does exactly what the Unix command "sort FILENAME | uniq" > does just to > > see how it can be done. > > How long? Because you can do that on one line in perl. :-) Hi John (we're not worthy - Wayne's World) ;-) I've ju

RE: equivalent of break command?

2005-06-13 Thread Tielman Koekemoer \(TNE\)
> I'm trying to write a perl script that automates g++. > There is an if statement in the script that basically works like this: > > if there are no arguments > { >print an error message >break (end the program) > } The "last" (same as break in C/Java) and "next" (same as continue in C) f