Le 28 mai 2009 22:35, Jerome Kieffer <jerome.Kieffer@???> a écrit :
>
> Bonjour,
>
> Comme il y a des mongeur de perl dans le secteur, je me permet de leur
> poser une question ...
>
> J'aimerais modifier un fichier control en retirant systematiquement la ligne contenant $scfdump.
> Comment faire cela avec perl ?
>
> #
> #.... start optimization or single point
> #
> $e=0;
> if($opt==1) {
>
> #retirer $scfdump ici de control
>
> ($cosmo==2) && return(-23,"ERROR: the isocavity approach cannot be used in optimizations (no gradient)",$info);
> # set up jobex parameter
> $tmp= "jobex";
> ($ri==1) && ($tmp .= " -ri");
> $tmp .= " -c $geoiter -energy $geo_energy_conv -gcart $gcart";
> $e=system "$tmp >jobex.out";
> } else {
> ...
>
> Merci de votre aide ou de vos idée pour faire cela le plus simplement possible.
Ce n'est pas super clair ton explication mais s'il faut retirer de ton
fichier la ligne contenant $scfdump, alors,
# perl -ane 'print if not /\$scfdump/' monfichier
PK
--
|\ _,,,---,,_ Patrice KARATCHENTZEFF
ZZZzz /,`.-'`' -. ;-;;,_ mailto:p.karatchentzeff@free.fr
|,4- ) )-,_. ,\ ( `'-' http://p.karatchentzeff.free.fr
'---''(_/--' `-'\_)
