On Mon, 29 Mar 2004 15:05:34 +0530 "MuthuKumar" <[EMAIL PROTECTED]> wrote:
$name =~ s/\W.*//; #change 1
This RE deletes zero or more non-alphanumeric characters followed by anything.
So it deletes the entire string, since there was no match on a non-alphanumeric character.
Half-right. ;) It deletes nothing, since there was no match...
James
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>