Re^5: Preprocessing print statements

Replies are listed 'Best First'.
Re^6: Preprocessing print statements by karlgoethebier (Abbot) on Nov 12, 2020 at 22:00 UTC
Customer: "I don't know!" Best regards, KGB Ť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]
Re^7: Preprocessing print statements by LanX (Saint) on Nov 13, 2020 at 20:47 UTC
> Customer: "I don't know!" Look, I'm not "support" or a "code writing service". And "I don't know" any better strategy to teach Perl, than asking and stimulating efforts. If you think you can do better, you are welcome to demonstrate your understanding of "support" ... Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery}	[reply]
Re^8: Preprocessing print statements by karlgoethebier (Abbot) on Nov 14, 2020 at 10:12 UTC
"...better strategy..." Tja, I'm not sure. Consider use of last: `# Some possible answers #1: The solution is obvious. #2: Use a block. #3 Make it so: KARL: { if ($x) { $y or last; print "Continue with the if clause\n"; } }` [download] Best regards, Karl Ť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]