Help for this page

Select Code to Download


  1. or download this
            use Time::HiRes 'time';
        
    ...
           ^a$|^b$|^c$|^d$|^e$|^f$: 0.443303
                   ^(a|b|c|d|e|f)$: 0.031506
                       a|b|c|d|e|f: 0.043478
    
  2. or download this
    $rex = qr/my.STRING/is;
    print $rex;                 # prints (?si-xm:my.STRING)
    s/$rex/foo/;