RE: regular expression question

[Olivier . Gerault]

Hi,

This script works

<--
for ('"[EMAIL PROTECTED];[EMAIL PROTECTED]')
{
  /^(.*);(.*)$/;
  print $1 . "\n";
}
-->

Another way could be
<--
@array = split /;/, '"[EMAIL PROTECTED];[EMAIL PROTECTED]';
print $array[0];
-->

And so many other...

Olivier Gerault
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs