URL: https://linuxfr.org/forums/programmation-perl/posts/des-regexps-plus-rapides
Title: Des regexps plus rapides !
Authors: Grégory SCHMITT
Date: 2004年08月24日T22:04:52+02:00
Tags: 
Score: 0
Bonjour, 
 
Tout est dans le titre. 
Dans mon cas, j'ai une chaîne qui contient du texte. A côté, j'ai un tableau rempli d'éléments (environ 100-200), dont certains contiennent du code d'expression régulière. L'objectif est de savoir, pour chaque élément du tableau, s'il est contenu dans la chaîne (et éventuellement de le renvoyer dans un autre tableau). 
 
Ce que je fais, c'est un grep, du genre: 
@nouveau_tableau = grep($ma_chaine =~ m/$_/, @mon_tableau); 
 
J'ai essayé aussi avec un foreach. 
 
Le problème, c'est que c'est pas trop rapide, d'autant plus que j'ai près d'une cinquantaine de chaînes à tester comme ça. 
 
Quelqu'un aurait-il quelques trucs et astuces de derrière les fagots ?
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="https://linuxfr.org/forums/programmation-perl/posts/des-regexps-plus-rapides.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://linuxfr.org/forums/programmation-perl/posts/des-regexps-plus-rapides.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>