如何在perl中匹配以-BEGIN PRIVATE key -开头的键？

在Perl中，可以使用正则表达式来匹配以"-BEGIN PRIVATE key -"开头的键。以下是一个示例代码：

my $key = "-BEGIN PRIVATE key -example";

if ($key =~ /^-BEGIN PRIVATE key -/) {
    print "匹配成功！";
} else {
    print "未匹配到指定键！";
}

在上述代码中，使用了Perl的正则表达式匹配操作符=~来进行匹配。正则表达式/^-BEGIN PRIVATE key -/表示以"-BEGIN PRIVATE key -"开头的字符串。如果匹配成功，则输出"匹配成功！"；否则输出"未匹配到指定键！"。