キャプチャの使用例
22  

Perlでブックマークを表示する
 while (<>) {
     if (m[<DT><A HREF="(.*?)".*?>(.*?)</A>]) {
         print "$2\t$1\n" 
     }
 }

Emacsでアイコンのパス名を変更する
 M-x query-replace-regexp RET
    \(<img src="\(\.\./\)*\)\([a-z]+ball\.gif\)  RET
    \1img/\3                                     RET

Perlでアイコンのパス名を変更する
 perl -i~ -pe 's[(<img src="(\.\./)*)([a-z]+ball\.gif)][$1img/$3]g'
     ファイル名