正则表达式,匹配不以jpg结尾的字符串 如何写

正则表达式,匹配不以jpg结尾的字符串 怎么写
如题

------解决方案--------------------
$str = "abc.jj.jpege ";

if($str =~ /\.(?!jpg$)[^\.]+$/) {
print "$`\n ";
}

------解决方案--------------------
大意是匹配形如/\.[^\.]+$/,但是[^\]+这部分不为jpg。


------解决方案--------------------
$str = "abc.jj.jpege ";

if($str =~ /\.(?!jpg$)[^\.]+$/) {
print "$`\n ";
}

\.(?!jpg$) # 这一部分匹配 .xxXX的形式,其中 xxXX不能以jpg 结尾.
[^\.]+$ #这部分继续匹配一个或者多个字符(除了英文逗号外的)直到字串结尾
$` #是模式匹配之前查询的内容