sumengen — Sun, 05 Dec 1999 14:04:00 +0000

Just a small correction:

while ($data =~ m/The province of (.+) as of (.+)\./sogi)

------------------

Orpheus — Sat, 04 Dec 1999 00:59:00 +0000

that works great, thanks a lot.

Rob Pengelly — Sat, 04 Dec 1999 00:52:00 +0000

ok, this will work
$data="The province of Name(11:11) as of April 14, YR4.";

while ($data =~ m/The province of (.+) as of (.+)./sogi)
{
print "$1 and $2";
}

------------------
The longest recorded flight of a chicken is 13 seconds.

Orpheus — Sat, 04 Dec 1999 00:05:00 +0000

It says

The province of Name(11:11) as of April 14, YR4.

Rob Pengelly — Sat, 04 Dec 1999 00:00:00 +0000

what does the $data contain?
$data="XXX (XX:XX)April 17, YR4";?

------------------
The longest recorded flight of a chicken is 13 seconds.

Orpheus — Fri, 03 Dec 1999 22:43:00 +0000

the exact thing i'm trying to match is

The province of XXX (XX:XX) as of April 17, YR4

it's a program for an online game i'm trying to make.

I need $1 to be XXX (XX:XX) and $2 to be April 17, YR4

maybe that will help a little bit.

Rob Pengelly — Fri, 03 Dec 1999 21:34:00 +0000

Hmm, thats wierd that it only gets the first letter.

if
$data="one two three four";
than using
if($data=~ m/one(.+?)three(.+?)five/)
{
print "$1 and $2\n";
}
should print

"two and four"

------------------
The longest recorded flight of a chicken is 13 seconds.

Orpheus — Fri, 03 Dec 1999 21:01:00 +0000

thats close, it prints the first letter but i need the whole word.

Rob Pengelly — Fri, 03 Dec 1999 18:46:00 +0000

Instead of (.*)
try (.+?)

Also maybe use "m" before the first / so the regexp knows you are trying to match one "somthing" three "somthing" five, etc

if($data=~ m/one (.+?) three (.+?) five/)
{
print "$1 and $2\n";
}

Try that.

------------------
The longest recorded flight of a chicken is 13 seconds.

[This message has been edited by robp (edited 03 December 1999).]