Re: Preprocessing print statements

two alternative approaches:

a) If you are OK with buffering, you can still use select with a filehandle opened to a \$scalar and filter the scalar before printing. This has the advantage of minimal changes.

b) Personally I'd prefer my own out() routine - closing over a regex var - to replace all needed prints. That'll give you finer control over the single print chunks.

HTH

Cheers Rolf
_{(addicted to the Perl Programming Language :)

Wikisyntax for the Monastery}

UPDATED: Clarified that these are two different approaches.

Comment on Re: Preprocessing print statements Select or Download Code

Replies are listed 'Best First'.
Re^2: Preprocessing print statements by mauroid (Initiate) on Nov 11, 2020 at 13:42 UTC
Thank you. Could you please provide a sample code snippet? I am not entirely clear how to do what you suggest.	[reply]
Re^3: Preprocessing print statements by LanX (Saint) on Nov 11, 2020 at 13:55 UTC
for which part? replacing `print` with a sub `out()` should be straight forward. Opening a FH to a var is described in open#Opening-a-filehandle-into-an-in-memory-scalar and you already mentioned `select` Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply] [d/l] [select]
Re^4: Preprocessing print statements by karlgoethebier (Abbot) on Nov 12, 2020 at 07:12 UTC
"... straight forward..." The classic 24/7 support talk. Phone call round midnight: `Customer: "I got this nose/cuke problem." Support: "Replace nose with cuke. Customer: "But i don't understand!" Support: "The solution is obvious. Good night."` [download] Situation in the morning AKA aftermath: `[] All servers shutdown [] All airplanes grounded [] Perlmonks offline [] No transactions today [] All centrifuges bursted [] Don T. stays in office` [download] Whatever could happen. But then you are fired. ŤThe Crux of the Biscuit is the Apostropheť `perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'`Help	[reply] [d/l] [select]
Re^5: Preprocessing print statements by LanX (Saint) on Nov 12, 2020 at 15:06 UTC
Re^6: Preprocessing print statements by karlgoethebier (Abbot) on Nov 12, 2020 at 22:00 UTC
Some notes below your chosen depth have not been shown here


laziness, impatience, and hubris
	PerlMonks