regex - Perlの引用符内の文字列を読み取る

Question

これは文字列です：

[quote="test post1"]this is a test post[/quote]

テストpost1値のみを取得したい

これが私がしていることです...

[tmp test][item-param body] [/tmp]
$str1 = $Scratch->{test};
$str1 =~ m/"(.?)"/;

しかし、それは期待値を与えていません：test post1

どんな助けでもありがたいです。

Answer 1

#!/usr/bin/perl;

my $str = '[quote="test post1"]this is a test post[/quote]';

if($str=~m/\"(.+)\"/) {
print $1;
}