RE: Perl2exe

> -Original Message- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] > Sent: Friday, May 21, 2004 2:57 AM > To: [EMAIL PROTECTED] > Subject: Re: Perl2exe > > > In article > <[EMAIL PROTECTED]>, > [EMAIL PROTECTED] (Manish U) writes: > >Hi, > > > >Can any one give me the url where

Re: Net::Google

On Thu, 20 May 2004, Mandar Rahurkar wrote: > I am trying to install the net::google module in order to use the google api however > I get following error: > > > Failed Test Stat Wstat Total Fail Failed List of Failed > ---

A MySQL Question

Probably this is not relavent to this mailing list... But any way I ll ask.. I am developing a web site traffic rating system. using a combination og perl and java (PERL in serverside, Java Applets in cliend side - My attempt to create dynamic images was not that successfull so I use a java applet

Net::Google

Hi, I am trying to install the net::google module in order to use the google api however I get following error: Failed Test Stat Wstat Total Fail Failed List of Failed --- t/002-spelling.t1 256 51

Rounding difference from Perl on Solaris and Windows

The code is very simple(it is not that much more complicated in the real processing, but wanted to see if it failed in this case), but I don't understand why the Unix is not rounding as I would expect. All the machines tested were under 5.8.3. $_ = 11700; printf "%6d %7.1f %7.2f\n",

Re: Finding missing numbers in sequence

Larry Wissink wrote: > > We have a backup server that is missing records from the production > server for a particular table. We know that it should have sequential > records and that it is missing some records. We want to get a sense of > the number of records missing. So, we know the problem

RE: Problem with use strict;

MCMULLIN, NANCY wrote on 14.05.2004: >But when I run the same code with use strict commented out - it >works just fine... A little late maybe, but CGI::Carp might be something for you. Its method fatalsToBrowser sends Perl's error messages to your browser window. HTH, Jan -- These are my prin

Re: perlglob on Windows platform

Satya Devarakonda wrote: > > Hi, Hello, > I am trying to delete zero byte files using the following code: > > for ($i=0; $i<[EMAIL PROTECTED];$i++) { ^^ You are accessing a nonexistent element of the array. If your array contains ten elements then that will also use the eleventh

Re: String problem

Werner Otto wrote: > > Hi there, Hello, > I am trying to do the following: > > $string = system ("ping -a $hostname | cut -c20-30"); Use the Net::Ping module instead. http://search.cpan.org/~bbb/Net-Ping-2.31/ > This result returns 0 which is suppose to indicate success. But it never > prov

RE: regex alternation question

> Would this be correct: /foo|bar/ Yes. > Should they be grouped thusly: /(foo|bar)/ This works too, but has the side effect of setting $1 to the matched value, either "foo" or "bar". > What about /(?:foo|bar)/ ? This is ok too, but the parens aren't necessary. If you wanted to search for

regex alternation question

I'm unclear about how alternation works in a regex. Say I want to find either "foo" or "bar" within a string. I don't care which one I match, only that I make a match. Would this be correct: /foo|bar/ Should they be grouped thusly: /(foo|bar)/ What about /(?:foo|bar)/ ? Specifically, I k

Re: Working with gzip files

> Is there an easy way to work with gzip files in perl? Basically, I'd > like to be able to view and manipulate them using filehandles, similar > to non-zipped files. Is there a good way to do this? > > Thanks. Check out the Compress::Zlib module on CPAN. http://search.cpan.org/~pmqs/Compress-Z

Maybe OT: Quantel DBI connector

I need a way to access a Quantel Database on my other server. Does anyone know anything about connecting to one? Is there a module out there for it? Thanks, Robert -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Working with gzip files

Is there an easy way to work with gzip files in perl? Basically, I'd like to be able to view and manipulate them using filehandles, similar to non-zipped files. Is there a good way to do this? Thanks. Jason -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PR

pointer to another list?

Hello group! Anyone have any idea of a mailing list or more resources about embedding Perl in C like is discussed here: http://www-h.eng.cam.ac.uk/help/mjg17/perldoc/pod/perlembed.html) TIA Lee.M -JupiterHost.Net -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAI

RE: String problem

Werner Otto wrote: > Hi there, > > I am trying to do the following: > > $string = system ("ping -a $hostname | cut -c20-30"); Then use backticks(`ping -a $hostname | cut -c20-30`) vs system if you want to see the output. System returns either success or failure, nothing else. Wags ;) >

perlglob on Windows platform

Hi, I am trying to delete zero byte files using the following code: for ($i=0; $i<[EMAIL PROTECTED];$i++) { $filelst[$i] =~ s/\s//; #Process creates zero byte file if nothing was found in the mailbox #Hence delete zero byte files

Re: DBM Files

> "Bob" == Bob Showalter <[EMAIL PROTECTED]> writes: Bob> DBM files, particularly combined with tied hashes and modules Bob> like MLDBM and Storable are an excellent solution to many Bob> problems, IMO. Also see DBM::Deep (in the CPAN, but belongs in the core) for an alternative to store nest

Re: How do you invoke a Clearcase View?

On Thu, 2004-05-20 at 10:20, PerlDiscuss - Perl Newsgroups and mailing lists wrote: > Does anyone know how to call a Clearcase setview from Perl, where you can > change directories and move around the vob, and compile files? I write the contents I wish to execute in a ClearCase setview -exec call

Use PAR instead. RE: Perl2exe

-Original Message- From: Manish U [mailto:[EMAIL PROTECTED] Sent: Wednesday, May 19, 2004 11:11 PM To: Beginners Subject: Perl2exe Hi, Can any one give me the url where i can get a free version of perl2exe. Regards Manish U ### PAR is on CPAN. The documen

String problem

Hi there, I am trying to do the following: $string = system ("ping -a $hostname | cut -c20-30"); This result returns 0 which is suppose to indicate success. But it never proves me wrong it always stays un-changed at 0. More to the point. I am trying to store the value returned, which would be "i

Re: Perl2exe

In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] (Manish U) writes: >Hi, > >Can any one give me the url where i can get a free version of perl2exe. Consider this instead: http://search.cpan.org/~autrijus/PAR-0.80/lib/PAR.pm -- Peter Scott http://www.perldebugged.com/ *** NEW *** http://www.pe

How do you invoke a Clearcase View?

Does anyone know how to call a Clearcase setview from Perl, where you can change directories and move around the vob, and compile files? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: regex string modification

On May 19, 2004, at 7:21 PM, meb wrote: My regex looks something like this: (Save 1st 20 words): /^(\w|\W){20}/g ^ matches only at the beginning of the string while the /g modifier tries to create a global search matching all occurrences. Matching all of what can only be in one place is pointles

RE: DBM Files

BOLCATO CHRIS (esm1cmb) wrote: > Hello all, > I am fairly new to using Perl and have some questions regarding DBM > Files. The answer to a lot of these questions will be "it depends". It depends on what you're trying to do. > One, which type is recommended DB_File, GDBM, SDBM, NDBM etc.? In gen

Re: Array with unique elements only

Ramprasad A Padmanabhan wrote: > > Wow, > unique items is surely an FAQ. > But here you dont need to filter the array, just see the answer inline > > On Thu, 2004-05-20 at 17:07, Mark Martin wrote: > > Hi, > > I'm moving database data from table to table and want to make sure I'm > > getting only u

Re: public/private variables, accessor functions question

> Hi, I'm starting to look at OO in PERL, I've written a working class but I > don't know how to implement private and public variables and accessor > functions, any idea how to do that? > 'Perl' or 'perl' never PERL. perldoc perlboot perldoc perltoot perldoc perltooc perldoc perlbot Lots of

Re: public/private variables, accessor functions question

On May 20, 2004, at 8:32 AM, Graeme McLaren wrote: Hi, I'm starting to look at OO in PERL, I've written a working class but I don't know how to implement private and public variables and accessor functions, any idea how to do that? Perl takes a very lax view on the whole security issue of objects

DBM Files

Hello all, I am fairly new to using Perl and have some questions regarding DBM Files. One, which type is recommended DB_File, GDBM, SDBM, NDBM etc.? Is it common practice to make use of DBM files? Or should I look into some other database structure? Is it a significant performance enhancement over

RE: Perl2exe (U)

UNCLASSIFIED I have had no problems compiling perl into executables on windows with the Active State Perl Development kit. http://www.activestate.com/Products/Perl_Dev_Kit/ -Original Message- From: Ramprasad A Padmanabhan [mailto:[EMAIL PROTECTED] Sent: Thursday, May 20, 2004 3:07 AM

public/private variables, accessor functions question

Hi, I'm starting to look at OO in PERL, I've written a working class but I don't know how to implement private and public variables and accessor functions, any idea how to do that? Here's wot I have so far: ### #!/usr/bin/perl -w use strict; use CGI; m

Re: Array with unique elements only

On May 20, Jeff 'japhy' Pinyan said: > my (%count, %unique); > > while (my @row = $sth->fetchrow) { >my $field = $row[0]; >if ($count{$field}++) { delete $unique{$field} } >else { $unique{$field} = [ @row ] }; # or 1, or whatever you want > } > >Here, every time a row is seen, its

RE: regular expr.

Thanks a lot Jose and Ramprasad. regards, Ajitpal Singh, Wipro Technologies. Finchley,London. Tel:044 208 495 6317 Mobile:07900534143 -Original Message- From: Jose Alves de Castro [mailto:[EM

Re: Array with unique elements only

On May 20, Mark Martin said: >I'm moving database data from table to table and want to make sure I'm >getting only unique records. This is similar to a topic that came up two days ago. >Only want unique $field1 and was looking at the cookbook code, but for that >I have to populate a hash and the

Re: Array with unique elements only

Wow, unique items is surely an FAQ. But here you dont need to filter the array, just see the answer inline On Thu, 2004-05-20 at 17:07, Mark Martin wrote: > Hi, > I'm moving database data from table to table and want to make sure I'm > getting only unique records. > > Only want unique $field1 a

Array with unique elements only

Hi, I'm moving database data from table to table and want to make sure I'm getting only unique records. Only want unique $field1 and was looking at the cookbook code, but for that I have to populate a hash and then re-inspect through before inserting uniques, something like : %ucnt = (); while

Re: regular expr.

You dont require regex for that use printf or sprintf eg; my $var=2; $var=sprintf("%05d",$var); print $var; HTH ram On Thu, 2004-05-20 at 16:46, Singh, Ajit p wrote: > Hello everybody, > > My problem is that I have a define a variable which combines two other > variables with preceeding zeroes

Re: regular expr.

On Thu, 2004-05-20 at 12:16, Singh, Ajit p wrote: > Hello everybody, > > My problem is that I have a define a variable which combines two other > variables with preceeding zeroes. > > i.e final_variable : <3 digit var1><5 digit var2> > > if var1 is single digit i have to preceed it with two zer

regular expr.

Hello everybody, My problem is that I have a define a variable which combines two other variables with preceeding zeroes. i.e final_variable : <3 digit var1><5 digit var2> if var1 is single digit i have to preceed it with two zeroes. eg : 002 if var1 is double digit i have to preceed it with on

Re: regex string modification

On Thu, 2004-05-20 at 01:21, meb wrote: > Maybe this is because I'm a newbie, or maybe it's because I'm trying to > modify RSS text. This is a perl script for a web site. > > In any case, there's a feed that includes the author at the end of the > (looong) description. I'd like to limit the decsri

Crypt::RSA

Hi, If given the following in genkey.pl : use Crypt::RSA; my ($rsa) = new Crypt::RSA( KF => 'SSH'); my ($pub, $prv) = $rsa->keygen( Identity => 'cc <[EMAIL PROTECTED]>', Password => 'i hate tests.', Size => 102

regex string modification

Maybe this is because I'm a newbie, or maybe it's because I'm trying to modify RSS text. This is a perl script for a web site. In any case, there's a feed that includes the author at the end of the (looong) description. I'd like to limit the decsription to the first 20 words, add an ellipsis (...)

RE: combining data from more than one file...

Sorry, I meant to upload this script (see below). However, I have one last question. Why can't I use s/\n//g;# instead of tr/A-Za-z-//cd; in the script below? I thought it would be simpler to remove the newline characters from $_ which is all I really want to do. However, most of the time

Re: combining data from more than one file...

Thanks to those that helped. The code works great. Now I will practice one honing it down to the bare essentials. Below is the final code you all helped with. -Thanks a million! -Mike >>> Begin PERL Code<<< #! /usr/bin/perl -w use strict; use FileHandle; my %organisms; print "Enter in a list of

RE: Perl2exe

No buddy, I work for the one and only one "HP". Regards javeed ** There's no place like ~/ *** -Original Message- From: Ramprasad A Padmanabhan [mailto:[EMAIL PROTECTED] Sent: Thursday, May 20, 2004 12:37 PM To: SAR, JAVEED (STSD) Cc: Manish U; Beginners Subjec

RE: Perl2exe

Precisely, I have even bought 'perl2exe' from indigostar. But we had such a headache creating exes of some heavy files ( mostly those that required XML::Parser or JABBER modules ) that we would give up and ship the source. Thanks Ram ( BTW do U work for indigostar ? ) On Thu, 2004-05-20 at 1