Godwin Stewart wrote:
On Mon, 28 Oct 2002 12:16:45 +0100, Benoit Mordelet <[EMAIL PROTECTED]>
wrote to [email protected]:
cat fichier.txt | perl -e 'my $tmp = ""; while (<>) {chop $tmp if
(/^!/); print $tmp; $tmp = $_;}' > final.txt
Je pense que ça devrait être "chomp $tmp" plutôt que "chop $tmp"...
oui, pour plus de surete.
Aussi, il ne faut pas oublier de recracher la dernière ligne :
encore un oubli de ma part. desole j'ai ecrit cette commande un peu
rapidement.
a+
ben
Linux-Azur : http://www.linux-azur.org
Désinscriptions: http://www.linux-azur.org/liste.php3
**** Pas de message au format HTML, SVP ****
