Regex matching of patterns in variables

2004-03-03 Thread Moulder, Glen
hey all, Scratchin' my head on this one for a couple of hours now, looking at camels. sheep and other documentation creatures to no avail. I'm trying to match a pattern that's already (must be) in a variable like so: $var = coyote; while (FILE) { if ($_ =~ /$var/i) { print $_ .

RE: Excel, hyperlinks and empty rows.

2003-07-10 Thread Moulder, Glen
Hi Richard; This works for me to return the last populated row -- $worksheet_rows = $worksheet-UsedRange-rows-count; Don't know about the hyperlink. HTH, Glen -Original Message- From: Beckett Richard-qswi266 [mailto:[EMAIL PROTECTED] Sent: Thursday, July 10, 2003 7:31 AM To: '[EMAIL

RE: Excel, hyperlinks and empty rows.

2003-07-10 Thread Moulder, Glen
Beckett Richard wrote: I did get this suggested: my $LastRow = $sheet-UsedRange-Find({What=*, SearchDirection='xlPrevious, SearchOrder=xlByRows})-{Row}; but I get bareword errors on xlPrevious and xlByRows when I try to use it, and I can't work out a syntax that will work. Try

FW: Date from string

2003-06-10 Thread Moulder, Glen
Title: Message I would like to re-format it to be more readable, something like this: 15:02:23 JUN 09 2003 try this -- %monthnames = ('00', 'Nul', '01','Jan', '02','Feb', '03', 'Mar', '04','Apr', '05','May', '06','Jun', '07','Jul',

RE: to the tooth rules on hash's of hash's

2003-03-04 Thread Moulder, Glen
you wrote: I still hate the french they are cowards. You are stupid from... Hudson, A professional programmer's list is no place for bigoted comments about anyone's ethnic, religious, geographic or political orientation. Perhaps your personal views would be better accepted by someone at

RE: to the tooth rules on hash's of hash's

2003-03-04 Thread Moulder, Glen
, Greg [mailto:[EMAIL PROTECTED] Sent: Tuesday, March 04, 2003 11:37 AM To: Moulder, Glen; Hudson T CLark Cc: perl-win32-users Subject: RE: to the tooth rules on hash's of hash's A bit hypocritical don't you think Glen... :( Greg -Original Message- From: Moulder, Glen [mailto:[EMAIL

TPJ announcment from Doctor Dobb's

2002-09-27 Thread Moulder, Glen
In case anyone's interested... The Perl Journal - Back in Business! http://www.tpj.com/ Since 1996, The Perl Journal has been the definitive publication for and about Perl programming. Now as a monthly e-zine for the first time, TPJ is set to bring you more, better Perl stuff than ever

FW: NET::Telnet

2002-09-17 Thread Moulder, Glen
Carter, what you're saying may work on Unix systems, but after 2 weeks of hair-pulling last year, I gave up trying to use Net::Telnet on legacy Univac and Dec systems. The module just couldn't handle the odd terminal emulation escape sequences that were being fed to it (especially on the

FW: NET::Telnet

2002-09-17 Thread Moulder, Glen
, September 17, 2002 1:49 PM To: 'Moulder, Glen' Subject: RE: NET::Telnet I'll bet you didn't try setting the term type to 'TTY'. - Mark. -Original Message- From: Moulder, Glen [mailto:[EMAIL PROTECTED]] Sent: Tuesday, September 17, 2002 1:42 PM To: perl-win32-users Subject: FW: NET

FW: Quick Question - Decimals

2002-07-24 Thread Moulder, Glen
If I receive any other number, the decimal will be two places from the right, so that 113 wil be 1.13 and 1045 will be 10.45 Any help will be appreciated. try looking up sprintf/printf in the docs ___ Perl-Win32-Users mailing list [EMAIL

OT Q: Internet Information Server mailing list

2002-05-16 Thread Moulder, Glen
Hi all, Sorry for the OT post, but google didn't turn up anything. I've got a complex perl CGI app running that works very well on our intranet, *except* that it only works correctly if the user logs in as an admin. A normal user can run the script in the browser but none of the .GIFs or

Q:Net::FTP-quot()

2002-04-10 Thread Moulder, Glen
Hello all, Is anybody using the Net::FTP-quot() method for anything useful? Coulda sworn I had this workin' this morning -- $FTPobj-quot(\\somedir\someotherdir\\some3rddir\\script.pl) || die can\'t quot - ACK!\n; To run a script up on my server and generate a text file. It runs, but refuses

RE: Telnet on Win32

2002-04-10 Thread Moulder, Glen
Hi, I've been doing a lot of work on my LAN lately, trying to establish connections between my PC and the server and conduct operations on the server. I beat my head on Net::Telnet (in an environment similar to yours) for over a week and finally gave up, opting for Net::FTP instead which is

RE: Net::FTP-quot()

2002-04-10 Thread Moulder, Glen
Oops, hit send too quick there last time. No, the typo only appeared in the message, it's not in the original code. Glen -Original Message- From: Joseph Youngquist [mailto:[EMAIL PROTECTED]] Sent: Wednesday, April 10, 2002 3:54 PM To: 'Moulder, Glen' Subject: RE: Net::FTP

RE: Phantom process?

2002-02-08 Thread Moulder, Glen
]] Sent: Thursday, February 07, 2002 7:06 PM To: 'Moulder, Glen' Subject: RE: Phantom process? have you tried $obj = Win32::OLE-new('Access.Application',{$_[0]-Quit();}) or $obj = Win32::OLE-new('Access.Application',{$_[0]-Exit();}) regards Steve -Original Message

RE: Phantom process?

2002-02-08 Thread Moulder, Glen
That is definitely incorrect syntax. You are missing the sub keyword: $obj = Win32::OLE-new('Access.Application', sub {$_[0]-Quit();}); But for this simple case it is much easier to write: $obj = Win32::OLE-new('Access.Application', 'Quit'); As to the Access object itself

FW: An open complaint (was RE: An Index of Incivility in the Perl Com munity )

2001-06-12 Thread Moulder, Glen
Dave, I've been programming perl now for a couple of years and I'm working on a finanical app that's running about 19,000 lines of code. Although I've programmed for 20 years in various languages (COBOL, dBASE, FoxPro, etc.), it took me a while to get up to speed in perl. I first bought

FW: Searching a directory tree

2001-03-28 Thread Moulder, Glen
Searching for files? Use File::Find. Glen -Original Message- From: Gray, Martha J. [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 28, 2001 10:02 AM To: 'Perl List' Subject: Searching a directory tree Hi all, I was wondering if there was a way to search (traverse) a

Q: Using splice on a matrix

2001-03-13 Thread Moulder, Glen
Good day perlfolk, I often work with data matrices (lists of lists) in my scripts. A simple example is: @matrix = (); @list1 = ("one","two","three"); @list2 = ("four","five","six"); @list3 = ("seven","eight","nine"); @list4 = ("ten","eleven","twelve"); push @matrix, [ @list1 ]; push @matrix, [

FW: Q: sorting a list of lists with eval

2001-03-06 Thread Moulder, Glen
54 PM To: Ron Grabowski Cc: Moulder, Glen; 'perl-win32-users' Subject: Re: Q: sorting a list of lists with eval On Mon, 5 Mar 2001, Ron Grabowski wrote: # create test data matrix @data_line = @data_matrix = (); @data_line = ("1","26","0","0&quo

FW: operator help

2001-03-06 Thread Moulder, Glen
Peter, Take a look at eval. -Original Message- From: Peter Eisengrein [mailto:[EMAIL PROTECTED]] Sent: Tuesday, March 06, 2001 2:20 PM To: Perl-Win32-Users Mailing List (E-mail) Subject: operator help I'm trying to allow the user to select an operator from an @array to

FW: FW: Q: sorting a list of lists with eval

2001-03-06 Thread Moulder, Glen
Yeah, I'm used to ", so just habitually delimit with it. What other constructs in perl would use " besides delimiting text? Oh, maybe s" or m"? -Original Message- From: Ron Grabowski [mailto:[EMAIL PROTECTED]] Sent: Tuesday, March 06, 2001 3:08 PM To: Moul

Q: sorting a list of lists with eval

2001-03-05 Thread Moulder, Glen
Good day listfolk, I'm experiencing a problem with sorting a list of lists. I'm trying to use eval to sort the list and the code sometimes dies with Error: Runtime exception when it hits the sort. Sometimes it works, sometimes it doesn't, and I don't know why. I've been able to replicate

FW: Printing work days of the week

2001-03-01 Thread Moulder, Glen
Hi Ben, I use Date::Calc for this sort of work. Glen -Original Message- From: Conrad, Ben [mailto:[EMAIL PROTECTED]] Sent: Thursday, March 01, 2001 2:16 PM To: Perl-Win32-Users (E-mail) Subject: Printing work days of the week Hello, I've been trying to get a script