Thanks, Jeff. But for qr/(\d+)uu/ and 'uu\1' on '22uu', I got 'uu\1' instead of 'uu22'.
-----Original Message----- From: Jeff Pang [mailto:[EMAIL PROTECTED] Sent: Tuesday, January 22, 2008 5:02 PM To: beginners-list Subject: Re: list or hash of replacement regex -----Original Message----- >From: "Zhao, Bingfeng" <[EMAIL PROTECTED]> >Sent: Jan 22, 2008 4:53 PM >To: beginners@perl.org >Subject: list or hash of replacement regex > >But perl complains, so I update it as: >my %policies = ( > qr/abc/ => "def", > qr/jfk\s+/ => "jfk ", > qr/\d+uu/ => "uu\1" >); For a first look, you may reversed the hash's keys and values. Constructing it as below is better. %policies = ( 'def' => qr/abc/, 'jfk' => qr/jfk\s+/, ...); Regards, Jeff Pang -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
