Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

line number

4 réponses
Avatar
fred
This is a sed command that substiture bike by car on fourth line.

sed -e "4s/bike/car/"

What is the perl the equivalent.

Thanks

4 réponses

Avatar
Benoit Izac
Bonjour,

le 06/12/2009 à 20:41, fred a écrit dans le message
:

This is a sed command that substiture bike by car on fourth line.

sed -e "4s/bike/car/"

What is the perl the equivalent.



perl -pe 's/bike/car/ if ($. == 4)'

$. peut aussi s'écrire $NR ou $INPUT_LINE_NUMBER pour plus de clareté.

--
Benoit Izac
Avatar
fred
On Dec 6, 4:41 pm, Benoit Izac wrote:
Bonjour,

le 06/12/2009 à 20:41, fred a écrit dans le message
:

> This is a sed command that substiture bike by car on fourth line.

> sed -e "4s/bike/car/"

> What is the perl the equivalent.

perl -pe 's/bike/car/ if ($. == 4)'

$. peut aussi s'écrire $NR ou $INPUT_LINE_NUMBER pour plus de clareté .

--
Benoit Izac



Merci

Et si l'on veut changer toutes les occurrences de (bike) par (car) en
spécfiant un bloc entre la ligne 1 et 5

Dans vim c'est:
1,5s/bike/car/g

En perl ??
Avatar
Benoit Izac
Bonjour,

le 07/12/2009 à 00:18, fred a écrit dans le message
:

> This is a sed command that substiture bike by car on fourth line.

> sed -e "4s/bike/car/"

> What is the perl the equivalent.

perl -pe 's/bike/car/ if ($. == 4)'

$. peut aussi s'écrire $NR ou $INPUT_LINE_NUMBER pour plus de clareté.



Et si l'on veut changer toutes les occurrences de (bike) par (car) en
spécfiant un bloc entre la ligne 1 et 5

Dans vim c'est:
1,5s/bike/car/g



perl -pe 's/bike/car/g if ($. >= 1 && $. <= 5)'

--
Benoit Izac
Avatar
Benoit Izac
Dans le message , le 07/12/2009 à 00:25, j'ai
écrit :

Et si l'on veut changer toutes les occurrences de (bike) par (car) en
spécfiant un bloc entre la ligne 1 et 5

Dans vim c'est:
1,5s/bike/car/g



perl -pe 's/bike/car/g if ($. >= 1 && $. <= 5)'



Ou plus simplement :
perl -pe 's/bike/car/g if ($. <= 5)'

--
Benoit Izac