Re: Regex assistance

On Sat, 17 Dec 2005, M. Lewis wrote: > Charles K. Clarkson wrote: > > M. Lewis wrote: > > > > : But I don't think the following regex is really doing that: > > : : /micr[qw]o[-]ca[a]p[k][s]/i > > : : Suggestions, corrections welcome. > > > > /Microcap|Micro-cap|Mi

Re: Regex assistance

Charles K. Clarkson wrote: M. Lewis wrote: : But I don't think the following regex is really doing that: : : /micr[qw]o[-]ca[a]p[k][s]/i : : Suggestions, corrections welcome. /Microcap|Micro-cap|MicroCaap|Micrqocap|MicrwoCap|MicroCapks/ One advantage of t

RE: Regex assistance

M. Lewis wrote: : But I don't think the following regex is really doing that: : : /micr[qw]o[-]ca[a]p[k][s]/i : : Suggestions, corrections welcome. /Microcap|Micro-cap|MicroCaap|Micrqocap|MicrwoCap|MicroCapks/ One advantage of this regex is that new obfuscat

Regex assistance

I'm trying to match some obfuscations in some spam. The words that I'm trying to catch are: Microcap Micro-cap MicroCaap Micrqocap MicrwoCap MicroCapks But I don't think the following regex is really doing that: /micr[qw]o[-]ca[a]p[k][s]/i Suggestions, corrections welcome. -- . REAL

RE: Regex Assistance

Thanks. That did the trick. Much appreciated. John -Original Message- From: Joshua Colson [mailto:[EMAIL PROTECTED]] Sent: 17 January 2002 17:58 To: '[EMAIL PROTECTED]' Subject: RE: Regex Assistance I've commented out two lines in your code and replaced them with mi

Re: Regex Assistance

John Edwards wrote: > > Hi group. Hello, > I have the following snippet of code. It's not working and I've been going > round in circles trying to figure out why. > > I need a routine that will look at the filename, if that filename already > exists, then add a (1) to the end. I've got the che

Re: Regex Assistance

On Thu, Jan 17, 2002 at 06:16:08PM +, Frank goofed: > my $num= ($name=~/\((\d+\)/)?$1:1; > $num++ while(-e "$name($num).$ext"); ---end quoted text--- Ah, forgot to paste the tested version back in my bad. #!/usr/bin/perl use strict; my($name,$ext)=('test','foo'); my $num= $name=~/\((d+)\)/

Re: Regex Assistance

On Thu, Jan 17, 2002 at 05:42:31PM -, John wrote: > -- code -- > my ($name, $ext) = split(/\./,$fileoutname); > > if ($name =~ /\((\d{1,1})\)$/) { # Looks for (1) on the end for example > my $number = $1; > $number++; > $name =~ tr/\(\d\)/\($number\)/; > } else

Re: Regex Assistance

In article <2FB59B145095D511A7C90050BAC349F31730A3@MAIL>, John Edwards wrote: > I need a routine that will look at the filename, if that filename already > exists, then add a (1) to the end. I've got the checking for existance > sorted, it's the generation of the new file name that is the issue.

RE: Regex Assistance

lto:[EMAIL PROTECTED]] Sent: Thursday, January 17, 2002 10:43 AM To: Perl Beginners (E-mail) Subject: Regex Assistance Hi group. I have the following snippet of code. It's not working and I've been going round in circles trying to figure out why. I need a routine that will look at t

Regex Assistance

Hi group. I have the following snippet of code. It's not working and I've been going round in circles trying to figure out why. I need a routine that will look at the filename, if that filename already exists, then add a (1) to the end. I've got the checking for existance sorted, it's the gener

RE: brainfart...need minor regex assistance

Thursday, August 16, 2001 7:43 PM > To: [EMAIL PROTECTED]; Beginners (E-mail) > Subject: RE: brainfart...need minor regex assistance > > ok, then why does this only print the 1 in 19? > > #!/usr/bin/perl -w > > > my $session = qx( > sqlplus -S rtdiag/***

RE: brainfart...need minor regex assistance

--- "Yacketta, Ronald" <[EMAIL PROTECTED]> wrote: > ok, then why does this only print the 1 in 19? > > #!/usr/bin/perl -w > > > my $session = qx( > sqlplus -S rtdiag/*\@DBNAME <<-! > SET HEA OFF; > select count(*) from session_list; > quit > ! > ); > #rem leading carrage returns > $ses

RE: brainfart...need minor regex assistance

ECTED]] > Sent: Thursday, August 16, 2001 18:49 > To: Beginners (E-mail) > Subject: Re: brainfart...need minor regex assistance > > > --- "Yacketta, Ronald" <[EMAIL PROTECTED]> wrote: > > Folks, > > > > I am loosing it today, for some odd rea

brainfart...need minor regex assistance

Folks, I am loosing it today, for some odd reason I am banging my head against the wall trying to parse some sql output. I have the following output: SQL> COUNT(*) -- 513 I just need the # in a variable (513) could someone slap me silly for some help here? Regards, Ron --