doesn't print

2001-06-13 Thread Leela Satuluri
Hello everyone, Thanks for the advice I alredy did load DOM for windows.I have installed perl in C:\perl directory. 1. I Created a folder for the perl progs inside perl folder. 2.stored a simple helloworld program (hello.pl)in this . 3.When i run the program with C:/perl/PerlPrg

[OLE] NLS problem

2001-06-13 Thread Petr Smejkal
Please have a look at the following source code and tell me what could be wrong. I'm trying to use English worksheet function and number formatting in non-English version of MS Excel. Has anybody an idea why single cell calls are interfaced correctly but range calls are not? It's quite inef

RE: simple global substitution

2001-06-13 Thread dayne_medlyn
I stand corrected ... thanks. Dayne > -Original Message- > From: Arthur Cohen [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, June 13, 2001 8:53 AM > To: [EMAIL PROTECTED] > Subject: RE: simple global substitution > > > : > > : > > : Ok, I have just explained this about 5 times at w

RE: simple global substitution

2001-06-13 Thread Arthur Cohen
: : : Ok, I have just explained this about 5 times at work and : this is how I : would return all the occurences of the "aaa" (or whatever : pattern you want : to put in it. : : $_ = join( "\n", m/(aaa)/ ) I think you need a "g" after the /, i.e. m/(aaa)/g Otherwise,

RE: simple global substitution

2001-06-13 Thread dayne_medlyn
Ok, I have just explained this about 5 times at work and this is how I would return all the occurences of the "aaa" (or whatever pattern you want to put in it. $_ = join( "\n", m/(aaa)/ ) Maybe this is too simple and misses a case ... but it does what is asked. Dayne > -Original Message-

RE: simple global substitution

2001-06-13 Thread Shawn
um... why not: #!perl use strict; my $str = "aaa 111 222 aaa 333 444 fgd asd 324 agd dd sadf fde aaa 333 sfsd"; my $search = "aaa"; output($str); sub output{ my $text = $_[0]; $text =~ s/.*?($search)/ $1/g; $text =~ s/(.* $search).*/$1/; $text =~ s/ ($search)/$1\n/

SV: simple global substitution

2001-06-13 Thread Allan Juul
hi again thanks to all i think this one from jenda is almost perfect: $str =~ s/.*?(aaa)/$1\n/g; $str =~ s/(aaa)?.*?$/$1/; variation-- $str =~ s/.*?(a+)/$1\n/g; $str =~ s/(a+)?.*?$/$1/; thanks for all the suggestions! allan ___ ActivePer

Setup and security issues

2001-06-13 Thread Young Fan
Hi, I'm looking into setting up Perl on Win32 ... is ActivePerl robust and secure for production use? We'll want to make it available to other organizations whose web sites are hosted on our server. Can someone tell me what needs to be done regarding setting up ActivePerl in a way that deals wi

Re: simple global substitution

2001-06-13 Thread Jenda Krynicky
> hi > am i going totally blind or? > from the snip below i want to output just: > aaa > aaa > > what i get is : > aaa > aaa > 333 444 > > > why is that? > thanks > allan > Is two regexps solution good enought? $str =~ s/.*?(aaa)/$1\n/g; $str =~ s/(aaa)?.*?$/$1/; Jenda == [EMAIL PROTE

RE: Perl on win98

2001-06-13 Thread Lee Goddard
Not unless you explicitly want to use it > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of Leela > Satuluri > Sent: 13 June 2001 13:38 > To: [EMAIL PROTECTED] > Subject: Perl on win98 > > > Hi everybody, > Thanks for all the suggestions with dow

RE: simple global substitution

2001-06-13 Thread Lee Goddard
That's what I'd do if I'd given up on the regex engine. Which I did about half an hour ago ;) > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of Snyder, > Christopher > Sent: 13 June 2001 13:49 > To: ActivePerl > Subject: RE: simple global substitution

Re: simple global substitution

2001-06-13 Thread Andy Jennings
Only one snag - it falls into the trap of finding more a's - altho this might not be a real world prob with actual text. I was going for a loop construct too when yours came in. A slight mod to yours (which is much cleaner and elegant than mine!) to test word boundaries instead of spaces and I th

RE: simple global substitution

2001-06-13 Thread Snyder, Christopher
I sent this to Allan earlier, but I tweaked it a bit and thought I'd show it to everyone for review. What do you folks think about this solution? $str = "aaa 111 222 aaa 333 444"; output($str); sub output { $text = $_[0]; foreach ($text =~ /\s*(aaa)\s/g) {print "$1\n";} } Chris -

Re: simple global substitution

2001-06-13 Thread Andy Jennings
Yeah - I know. I'm only on my second cup of coffee. It's bugging me too - off to the Owl book for me. :-) Andy - Original Message - From: "Lee Goddard" <[EMAIL PROTECTED]> To: "Andy Jennings" <[EMAIL PROTECTED]>; "Allan Juul" <[EMAIL PROTECTED]>; "ActivePerl" <[EMAIL PROTECTED]> Sent: W

Perl on win98

2001-06-13 Thread Leela Satuluri
Hi everybody, Thanks for all the suggestions with downloading.I have downloaded Activestate MSI & instaler1.1.TextPad is the editor I am using. 1. Do I have to download DOM for windows? Thanks in advance. Leela _ Get your FREE