Perl 中的正则表达式比 Java 或其他语言中的正则表达式更快吗 [关闭]

Perl 正则表达式的性能优势

perl
open(my $file, '<', 'example.txt') or die $!;
while (my $line = <$file>) {
    if ($line =~ /example/) {
        print $line;
    }
}
close($file);

java
import java.io.BufferedReader;
import java.io.FileReader;
import java.io.IOException;
import java.util.regex.Matcher;
import java.util.regex.Pattern;
public class RegexExample {
    public static void main(String[] args) {
        try (BufferedReader br = new BufferedReader(new FileReader("example.txt"))) {
            String line;
            Pattern pattern = Pattern.compile("example");
            while ((line = br.readLine()) != null) {
                Matcher matcher = pattern.matcher(line);
                if (matcher.find()) {
                    System.out.println(line);
                }
            }
        } catch (IOException e) {
            e.printStackTrace();
        }
    }
}