<?php
if(isset($_GET['source']))
    {
        
highlight_file(__FILE__);
        exit;
    }
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/2000/REC-xhtml1-20000126/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fr" lang="fr">
 <head>
  <meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
    <title>Untitled</title>
   </head>
 <body>
<p>Ceci est suite a <a href="http://www.commentcamarche.net/forum/affich-2433898">http://www.commentcamarche.net/forum/affich-2433898</a></p>
<p>Voici le code perl qui permettrait de résoudre le problème :</p>
<pre>#!/usr/bin/perl
use strict;use warnings;

my $url='http://feuks.free.fr/colles_bioch/B104xxx.rar';

foreach ( 'aaa'...'zzz' ){ 
    (my $r = $url) =~ s#(http://.*B104)\w{3}(\.rar)#$1$_$2#;
    print "$r\n"; 
}</pre>

<!--
$url_possible_fichier='http://feuks.free.fr/colles/colles_physio/P1[0-9]{2}[a-z]{3}.rar';
$chercher_a_cet_endroit=require('http://feuks.free.fr/colles/colles_physio/');
if file_exists(preg_match("#$url_possible_fichier#",$chercher_a_cet_endroit))
  {echo "oui";}
-->
 </body>
</html>