On Thu, Mar 29, 2001 at 09:06:32AM -0500, Ronald J Kimball wrote: > Since the keys in the hash are being checked with exists(), that could be: > > @Words{@Words} = (); Good point. And that's significantly quicker. This seems to be a shade faster yet: undef @Words{@Words}; .robin. -- select replace(a, CHR(88), replace(a,'''','''''')) from ( select 'select replace(a, CHR(88), replace(a,'''''''','''''''''''')) from ( select ''X'' a from dual)' a from dual) ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe