Kdtyjb

Is there a measurement for the vocal speed of a song?

What is the intuitive meaning of having a linear relationship between the logs of two variables?

Hide Select Output from T-SQL

Mapping a list into a phase plot

voltage of sounds of mp3files

Have I saved too much for retirement so far?

How can I get through very long and very dry, but also very useful technical documents when learning a new tool?

If a character can use a +X magic weapon as a spellcasting focus, does it add the bonus to spell attacks or spell save DCs?

Select empty space and change color in vector

How can a jailer prevent the Forge Cleric's Artisan's Blessing from being used?

Time travel short story where a man arrives in the late 19th century in a time machine and then sends the machine back into the past

Your magic is very sketchy

Was Spock the First Vulcan in Starfleet?

Displaying the order of the columns of a table

How could Frankenstein get the parts for his _second_ creature?

Bash method for viewing beginning and end of file

Is exact Kanji stroke length important?

Increase performance creating Mandelbrot set in python

Is there any reason not to eat food that's been dropped on the surface of the moon?

Coordinate position not precise

Is there an Impartial Brexit Deal comparison site?

Efficiently merge handle parallel feature branches in SFDX

Should my PhD thesis be submitted under my legal name?

MaTeX, font size, and PlotLegends

why do I have to pipe perl output into a new perl command

0

I want to remove whitespace between back-tick (x27) and word characters, inside of a perl script that performs many other regex substitutions. If I print the result of the earlier substitutions to the bash shell and then pipe into a new perl invocation, it works. But inside a single perl invocation, it doesn't. In the example below, the third line (a single perl command) does not work whereas the fourth line (two separate commands) does work.

printf '%b' 'Well, `n he said it n' 

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g; s|([x60])s*(w)|$1$2|g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' | perl -p -e 'use strict; use warnings; s|([x60])s*(w)|$1$2|g;'; echo

Why does it not work inside a single perl invocation? I thought we were supposed to avoid multiple or nested pipes (subshells).

This is perl 5, version 18 and GNU bash, version 3.2.57(1) in BSD unix.

perl substitution bash

share

asked 1 min ago

Jacob WegelinJacob Wegelin

163

add a comment | 

0

I want to remove whitespace between back-tick (x27) and word characters, inside of a perl script that performs many other regex substitutions. If I print the result of the earlier substitutions to the bash shell and then pipe into a new perl invocation, it works. But inside a single perl invocation, it doesn't. In the example below, the third line (a single perl command) does not work whereas the fourth line (two separate commands) does work.

printf '%b' 'Well, `n he said it n' 

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g; s|([x60])s*(w)|$1$2|g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' | perl -p -e 'use strict; use warnings; s|([x60])s*(w)|$1$2|g;'; echo

Why does it not work inside a single perl invocation? I thought we were supposed to avoid multiple or nested pipes (subshells).

This is perl 5, version 18 and GNU bash, version 3.2.57(1) in BSD unix.

perl substitution bash

share

asked 1 min ago

Jacob WegelinJacob Wegelin

163

add a comment | 

I want to remove whitespace between back-tick (x27) and word characters, inside of a perl script that performs many other regex substitutions. If I print the result of the earlier substitutions to the bash shell and then pipe into a new perl invocation, it works. But inside a single perl invocation, it doesn't. In the example below, the third line (a single perl command) does not work whereas the fourth line (two separate commands) does work.

printf '%b' 'Well, `n he said it n' 

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g; s|([x60])s*(w)|$1$2|g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' | perl -p -e 'use strict; use warnings; s|([x60])s*(w)|$1$2|g;'; echo

Why does it not work inside a single perl invocation? I thought we were supposed to avoid multiple or nested pipes (subshells).

This is perl 5, version 18 and GNU bash, version 3.2.57(1) in BSD unix.

perl substitution bash

share

asked 1 min ago

Jacob WegelinJacob Wegelin

163

printf '%b' 'Well, `n he said it n' 

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g; s|([x60])s*(w)|$1$2|g;' ; echo

printf '%b' 'Well, `n he said it n' | perl -p -e 'use strict; use warnings; s|n||g;' | perl -p -e 'use strict; use warnings; s|([x60])s*(w)|$1$2|g;'; echo

share

asked 1 min ago

Jacob WegelinJacob Wegelin

163

share

asked 1 min ago

Jacob WegelinJacob Wegelin

163

asked 1 min ago

Jacob WegelinJacob Wegelin

163

asked 1 min ago

Jacob WegelinJacob Wegelin

163