Perl正则表达式第一个字

时间:2016-10-10 07:57:49

标签: regex perl

我对perl中的regex很新,我有以下几行:

MD5ajdhe728ndsdhsds83ndsds /some/path/

我只想获得MD5值(" MD5和#34之后的数字/字母组合;)。我怎么做?我有点麻烦的第一个字。

提前谢谢。

1 个答案:

答案 0 :(得分:1)

#!/usr/bin/perl
use strict;
use warnings;
my $line = q{MD5ajdhe728ndsdhsds83ndsds /some/path/};
$line =~ /^MD5([a-zA-Z0-9]+)/;
print $1; 

Demo