- 论坛徽章:
- 0
|
本帖最后由 feiying00917 于 2014-07-14 09:15 编辑
#!/usr/bin/perl -w
open (FILE,">test.txt" ;
#if ($_=~/^\text\:bookmark text\:name=\"\_\_RefNumPara\_\_80266\_1546026487\"\/\>([\s\<\>\w\d\.\'\(\)\/\"\:]+)\<text\:bookmark\-end text\:name\=\"\_\_RefNumPara\_\_80266\_1546026487\"\/\>/)
$_='<text:bookmark text:name="__RefNumPara__80266_1546026487"/><text:span text:style-name="T22">On schematic page 42, the pin CSPBAVE (7) of instance U58 (MAXIM – </text:span><text:bookmark-start text:name="__DdeLink__60226_1521216572"/><text:span text:style-name="T22">MAX17611) is connect to </text:span><text:bookmark-end text:name="__DdeLink__60226_1521216572"/><text:span text:style-name="T22">CSBN(N-side), while the device datasheet (MAX17611_DS.pdf – Page23) indicates 'Connect CSPBAVE to the positive side of the differential output of the external current-sense averaging network'. Recommend connecting this pin to positive side pin CSPB1 ( . <text:s/>(Major)</text:span><text:bookmark-end text:name="__RefNumPara__80266_1546026487"/>';
if ($_=~/\<text\:bookmark text\:name=\"\_\_RefNumPara\_\_80266\_1546026487\"\/\>(.+)\<text\:bookmark\-end text\:name\=\"\_\_RefNumPara\_\_80266\_1546026487\"\/\>/)
{
$1=s/\<.*\>?//g;
print FILE $1;}
我要把<>和里面的内容去掉,可是我用这样的匹配$1=s/\<.*\>?//g; 最后得到的是空,该如何做,求帮忙! |
|