Re: [Q] How to eval an EXPR once and make it stick

2004-01-27 Thread Rob Dixon
Sam wrote: > > # Print lines (or not) until a blank line is found (or not) > > # This function works fine. But in the spirit of learning...read on. > > sub print_lines_ok { > > my ($output, $blank_lines) = @_; > > if ($blank_lines) { > do { > print if $output; > >

Re: How to calculate elapsed time ?

2004-01-27 Thread John W. Krahn
Stuart Clemons wrote: > > Hi all: Hello, > I'm trying to determine how long an system operation takes. Anyone know > of a simple way to do this ? Certainly. :-) > I wanted to establish the start time. Then run the operation. Then mark > the finish time. Then substract the start time from

Re: array push

2004-01-27 Thread Rob Dixon
Wolf Blaum wrote: > > For Quality purpouses, Rob Dixon 's mail on Tuesday 27 January 2004 00:30 may > have been monitored or recorded as: > > > The right conclusion for the wrong reasons Wolf! The spaces are the result > > of interpolating the array into a string, and the presence of a newline on >

Re: function that reads line numbers?

2004-01-27 Thread Kenton Brede
On Tue, Jan 27, 2004 at 06:55:50PM -0800, Trina Espinoza ([EMAIL PROTECTED]) wrote: > So this may be wishful thinking, but I would be kicking myself later if I didn't > ask. Is there a function in perl where you give > the function exact line numbers and it would only read the data in the range o

Re: How to calculate elapsed time ?

2004-01-27 Thread Wiggins d'Anconia
[EMAIL PROTECTED] wrote: Hi all: I'm trying to determine how long an system operation takes. Anyone know of a simple way to do this ? I wanted to establish the start time. Then run the operation. Then mark the finish time. Then substract the start time from the finish time to get an elaps

function that reads line numbers?

2004-01-27 Thread Trina Espinoza
So this may be wishful thinking, but I would be kicking myself later if I didn't ask. Is there a function in perl where you give the function exact line numbers and it would only read the data in the range of lines you gave it? My other alternative would be using a counter to find a start line a

How to calculate elapsed time ?

2004-01-27 Thread stuart_clemons
Hi all: I'm trying to determine how long an system operation takes. Anyone know of a simple way to do this ? I wanted to establish the start time. Then run the operation. Then mark the finish time. Then substract the start time from the finish time to get an elapsed time. Here's the simp

Re: Perl code

2004-01-27 Thread Joe Echavarria
Well, I just installed the module i it has many bugs, it does not work fine. Any clue ? --- Owen <[EMAIL PROTECTED]> wrote: > On Mon, 26 Jan 2004 12:13:14 -0800 (PST) > Joe Echavarria <[EMAIL PROTECTED]> wrote: > > > What about translating the numbers to spanish > string > > equivalent ? > >

RE: Best Encyption module for this task/goal

2004-01-27 Thread Dan Muey
> Howdy list, > > I made a script that use Crypt::OpenPGP to > encrypt/decrypt some data. > > I was thinking about testing out some other Encryption > modules to see if any worked faster/ were more portable. > Since I'm not an encyption master I thoguht I'd ask for > input from any experience

help on regular expression

2004-01-27 Thread Madhu Reddy
Hi, I need some help on regular expression... i have following in variable $total_count $total_count = "##I USBP 01 10:38:09(000) ETRACK_TOTAL_RECS : 100" Here in this ETRACK_TOTAL_RECS is fixed and common for all and rest is changing... like following $total_count = "##I USBP 02 12

Re: array push

2004-01-27 Thread wolf blaum
For Quality purpouses, Rob Dixon 's mail on Tuesday 27 January 2004 00:30 may have been monitored or recorded as: > The right conclusion for the wrong reasons Wolf! The spaces are the result > of interpolating the array into a string, and the presence of a newline on > each array element is immat

Best Encyption module for this task/goal

2004-01-27 Thread Dan Muey
Howdy list, I made a script that use Crypt::OpenPGP to encrypt/decrypt some data. I was thinking about testing out some other Encryption modules to see if any worked faster/ were more portable. Since I'm not an encyption master I thoguht I'd ask for input from any experienced in the matter.

Re: Placing handmade modules

2004-01-27 Thread drieux
On Jan 26, 2004, at 2:45 PM, Jan Eden wrote: Now I learned some more perlish behaviour: double colons are used for both the namespace and the replicated directory structure. actually, the double colons indicate a name space, and IF the name space IS external, then it is left to the File System Im

Re: array push

2004-01-27 Thread wolf blaum
For Quality purpouses, Rob Dixon 's mail on Tuesday 27 January 2004 12:42 may have been monitored or recorded as: > Didn't you mean to put spaces before the last three records? This will be > the result of > .. well - in Anthonys original mail there were spaces - i just copied that. > > Or did

Re: Can Perl run on Windows CE or Palm?

2004-01-27 Thread Daniel Staal
--As off Monday, January 26, 2004 9:05 PM +0800, Bee is alleged to have said: 1. Can Perl run on Windows CE or Palm ( Same as subject ) 2. If I can, Is there any modules would helpful on develope my script for these platforms ? 3. Can I use Perl to write the Hot Sync process instead of build in

Dump Excel File to Database table

2004-01-27 Thread markmartin
Hi, I've got my "Spreadsheet::ParseExcel" module and I can parse it using the "Linux example: parsing" from Teodor Zlatanov at http://www-106.ibm.com/developerworks/linux/library/l-pexcel/ but I'm not sure how it works. I need to upload an Excel Sheet to a database table and I'm having trouble

Re: dns servers in Perl?

2004-01-27 Thread Wiggins d Anconia
> Hi, > > Does anyone know of any perl modules that implement a basic DNS server? > After a quick search, I only found Stanford:DNSserver. > > Check out the Net::DNS list, http://search.cpan.org/search?query=Net%3A%3ADNS&mode=all The second entry, Net::DNS::Nameserver looks promising. ht

WinNT perl scripts - adding modules on all machines

2004-01-27 Thread Saadat Saeed
Just a question or doubt I had. Now using activestate's activeperl if I deploy it on all machines on my network. And I have certain scripts for those machines. If I release a new script that depends on a perl module not on the activeperl distribution by default how can I distrubute the modu