0

ここで何が起こっているのかわかりません... Perl に任せるのではなく、手動でやろうとしています。

my $replace_string
    = "s/typedef struct WebFontDescription WebFontDescription/struct WebFontDescription/g";

print $fh "perl -p -i -e \""
        . $replace_string
        . "\" \""
        . $idl_filename
        . "\"\r\n";

$replace_string
    = "s/\(WebFontDescription\\* webFontDescription/\(struct WebFontDescription\\* webFontDescription/g";

print $fh "perl -p -i -e \""
        . $replace_string
        . "\" \""
        . $idl_filename
        . "\"\r\n";

文字列を探していることがわかります

typedef struct WebFontDescription WebFontDescription

そしてそれを

s/\(WebFontDescription\\* webFontDescription/\(struct WebFontDescription\\* webFontDescription/g

しかし、どのように正規表現を正規表現に置き換えますか? それは意味がありません...

4

1 に答える 1