Posté par Pascal .
En réponse au journal album web.
Évalué à 6.
Je trouve ton script très sympatique, mais j'ai quelques suggestions pour ton code.
Tu devrais essayer d'utiliser HTML::Template pour remplir des fichiers HTML au lieu d'utiliser des regexps. HTML::Template est une librairie faite exprès pour ca.
Sinon y'a quelques petits trucs à revoir, du genre:
# Très sympatique
Posté par Pascal . En réponse au journal album web. Évalué à 6.
Tu devrais essayer d'utiliser HTML::Template pour remplir des fichiers HTML au lieu d'utiliser des regexps. HTML::Template est une librairie faite exprès pour ca.
Sinon y'a quelques petits trucs à revoir, du genre:
do
{
$npage = $npage + 1;
$j++;
} while( exists( $t[$j] ) );
que tu peux remplacer par
$npage = scalar @t;
ou alors:
do
{
$file = $filenames[$i];
...
...
$i++;
}while (exist $filenames[$i]);
que tu peux remplacer par:
foreach $file @filenames
{
...
....
}