Help for this page

Select Code to Download


  1. or download this
    $string =~ m/(?=.*abc)(?=.*xyz)/i;
    
  2. or download this
    use Benchmark;
    my $string = 'x' x 100;
    ...
        unanchored => sub { $string =~ /(?=.*abc)(?=.*xyz)/i },
        anchored => sub { $string =~ /^(?=.*abc)(?=.*xyz)/i },
    };