in reply to Re^9: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff
in thread What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff

my arg3=(defined($_2) : $_2 : 0;

Missing $?

You are commenting on modern perl. That already has something way better:

my $arg3 = $_2 // 0;
return unless my $line = <$fh>; to me is always preferable to my $line = <$fh> or return;

To me that is 1000% the other way around. Perception? Preference? Doesn't matter, as long as you are consistent.

If I have to maintain (as only maintainer) a piece of perl code, I will *rewrite* *all* statements as you state from action if expression; to expression and action; as that (to me) is waaaaaaaaaay easier to read/understand/maintain. Nothing to do with "idiomatic perl". Nothing at all!

In those case you should always use and/or and not &&/||:

expr1 && expr2 and action;
$debug and warn "Line = '$line'\n"; $? > 0 and warn "...";

Enjoy, Have FUN! H.Merijn
  • Comment on Re^10: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff
  • Select or Download Code

Replies are listed 'Best First'.
Re^11: What esteemed monks think about changes necessary/desirable in Perl 7 outside of OO staff
by likbez (Sexton) on Sep 29, 2020 at 16:16 UTC
    my arg3=(defined($_[2]) : $_[2] : 0; Missing $?
    Corrected. Thank you !
A reply falls below the community's threshold of quality. You may see it by logging in.