変数として一致Perl正規表現を保存

Question

私は変数として保存する必要がある単純なPerlの正規表現を持っています。

私はそれを印刷する場合：

print($html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g); 

は、それは私が保存したいものを出力しますが、とそれを保存しようとすると：

$link = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g; 

私は背中の「1」として値を取得します$link。私はこれが '1'マッチを見つけたためだと仮定します。しかし、代わりにどのように試合の内容を保存するのですか？あなたはまた、全体マッチしたパターン（$&）を取得することができます

Answer 1

パターンのマッチした部分式は、変数$1、$2などに保存されますが、これは高価であり、避けるべきです。

ここでの動作の違いは、スカラー対リストコンテキストの結果です。それらを知ること、それらがどのように異なっているか、それらがさまざまなPerl式の動作にどのように影響するかを知る必要があります。

Answer 2

すべての一致を得るには/ gに注意してください。それらはおそらくスカラーに入れられません。配列が必要です。

my @links = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/g; 

あなただけの最初に一致する場合：

my ($link) = $html_data =~ m/<iframe id="pdfDocument" src=.(.*)pdf/; 

注括弧（そして今では無用/グラムの欠如）。リストコンテキストでm //を呼び出す必要があります。 'perlfuncの' ドキュメントから

Answer 3

：

印刷LIST
は、文字列または文字列のリストを印刷します。

ので、M //戻り値
が は（wantarrayを？）望んでいたと判断しprint m//は、リストが
である（これは、キャプチャグループなしメートル//をappersところ、1または0の一致が
の合否を返しますm // gは一致のリストを返します）。コンテキスト（リストになく）

と

$link = M //は、スカラーであることができます。
したがって、m //は一致結果1（真）または0（偽）を返します。

Answer 4

私はちょうどこのようなコードを書いた。それは助けるかもしれません。それは基本的にあなたのものと似ていますが、私の場合を除き、括弧がいくつかあります。

my $path = `ls -l -d ~/`; 
#print "\n path is $path"; 
($user) = ($path=~/\.*\s+(\w+)\susers/); 

この例では、すべてのものを保存しようとしている場合、このようなものがありますか？私はわかりませんが、あなたは例として私を使うことができます。私は（\ + W）であるものは何でも保存しています：

($link) = ($html_data =~ (m/<iframe id="pdfDocument" src=.(.*)pdf/g));