De l'aide pour vos programmes et scripts en Perl

Re: remplacer un mot par un autre

Réponse à: remplacer un mot par un autre envoi de tal le 22 Aout 2004 13:33:59:

> if($myhash{$key})
> {
> print FILE1 >$new_key,"\n";
> }
> else
> {
> print FILE1 $_;
> }


je mettrai tout simplement à la place (des lignes ci-dessus) :


$_ =~ s/$key/$new_key/g;
print FILE1 $_;

Alerter Rezoweb si ce message est illégal