Crthuky

How to verify if g is a generator for p?

Will it be accepted, if there is no ''Main Character" stereotype?

What will be the benefits of Brexit?

Lay out the Carpet

quarter to five p.m

What is the oldest known work of fiction?

Modulo 2 binary long division in European notation

Can somebody explain Brexit in a few child-proof sentences?

Print name if parameter passed to function

What are the ramifications of creating a homebrew world without an Astral Plane?

Increase performance creating Mandelbrot set in python

Applicability of Single Responsibility Principle

What to do with wrong results in talks?

What would be the benefits of having both a state and local currencies?

Where in the Bible does the greeting ("Dominus Vobiscum") used at Mass come from?

voltage of sounds of mp3files

Can I Retrieve Email Addresses from BCC?

The baby cries all morning

How do I define a right arrow with bar in LaTeX?

Bash method for viewing beginning and end of file

Why did Kant, Hegel, and Adorno leave some words and phrases in the Greek alphabet?

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

MaTeX, font size, and PlotLegends

Cynical novel that describes an America ruled by the media, arms manufacturers, and ethnic figureheads

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

0

I want to remove whitespace between back-tick (x60) 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

edited 2 mins ago

Jacob Wegelin

asked 4 mins ago

Jacob WegelinJacob Wegelin

163

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  did you mean to ask that on stackoverflow? it does not seem related to this site on TeX
  
  – David Carlisle
  2 mins ago
  

  
  
  
  

add a comment | 

0

I want to remove whitespace between back-tick (x60) 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

edited 2 mins ago

Jacob Wegelin

asked 4 mins ago

Jacob WegelinJacob Wegelin

163

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  did you mean to ask that on stackoverflow? it does not seem related to this site on TeX
  
  – David Carlisle
  2 mins ago
  

  
  
  
  

add a comment | 

I want to remove whitespace between back-tick (x60) 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

edited 2 mins ago

Jacob Wegelin

asked 4 mins 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

edited 2 mins ago

Jacob Wegelin

asked 4 mins ago

Jacob WegelinJacob Wegelin

163

share

edited 2 mins ago

Jacob Wegelin

asked 4 mins ago

Jacob WegelinJacob Wegelin

163

asked 4 mins ago

Jacob WegelinJacob Wegelin

163

asked 4 mins ago

Jacob WegelinJacob Wegelin

163