perlと正規表現でパスを抽出する

Question

私はinclude =を検索し、 '='の後にパス全体を取得する必要があるテキスト/コードのブロックを持っています。

<item name="Post Include Code"> 
<value> 
First section of content 

include=Y:\default\main\tsconfig\tsconfig\custom\inline\callouts\search\results.tpl 
Second section of content 
</value> 

</item> 

コード：

if ($includeText=~ s/include=(.*)$/\1/) { 
    print "$1"; 
} 
else { 
    print "no path"; 
} 

include=Y:\default\main\tsconfig\custom\inline\callouts\search\results. 

が、これは検索されているXMLであると仮定します。私は、コード/テキストのチャンクに探しているものを手に入れます私はY:\default\main\tsconfig\custom\inline\callouts\search\results.tplになりたいので、テンプレートを含めることができます。テキスト/コードは別のファイルから取得されます。

ありがとうございます！

Answer 1

"include ="部分は含めたくありません。ちょうど後のことが欲しいので、 "include ="部分を[^include=].*（テキストエディタのテキストが私のために働いた）のようなもので除外しなければなりません。

Answer 2

私はあなたのスクリプトとその作業中に小さな変更を加えた：

$include = "include=Y:\\default\\main\\tsconfig\\custom\\inline\\callouts\\search\\results."; 


if ($include =~ m/include=(.*)$/) { 
    print "$1"; 
} 
else { 
    print "no path"; 
} 

Answer 3

// EDIT： は、いくつかの例を見て後に修正 これが動作しているようですが、これはRaghuramのポストと同じです。

if($includeText =~ m/include=(.*)$/){ 
        print "$1"; 
        } 
        else { 
         print "no path"; 
        } 

Answer 4

申し訳ありませんが、私はあなたのスクリプトを使用し、それを使用し、それはうまく動作します。あなたの正規表現には何も問題はありませんが、表示されていない他のコードがあります。

また、あなたの問題が何であるかについてもう少し詳しく知ることができます。 "私はちょうど得ることができない.."本当に何がうまくいかないのか私たちにはあまり言いません。

use strict; 
use warnings; 

そして、あなたはそのためのような愚かな何かを行っていること：このスクリプトは動作します

while ($includetext = <DATA>) { 
    if ($includeText =~ s/...) 

---

を：

を

マイ推測は、あなたが使用していないということです

use warnings; 
use strict; 

while (<DATA>) { 
    if (s/include=(.*)$/$1/) { 
      print "$1"; 
    } 
    else { 
      print "no path"; 
    } 
} 

__DATA__ 
include=Y:\default\main\tsconfig\custom\inline\callouts\search\results. 

Answer 5

これはあなたが探しているものだと思います

#!/usr/bin/perl 
use strict; 
use diagnostics; 
my $inc='include=Y:\default\main\tsconfig\custom\inline\callouts\search\results.tpl'; 
if ($inc =~ m{include=([\w\:\\\w /]+\w+\.\w+)}) 
{ 
print $1; 
} 
else 
{ 
print "no path"; 
}