note
grinder
<p>Ooh, nice! That's eminently readable. Much more likely to survive a code review than [aristotle]'s [id://564792|ex-bang-bang] operator.</p>
<p>Rather than</p>
<code>
my @part = (
'http://example.net/app',
( 'admin' ) x!! $is_admin_link,
( $subsite ) x!! defined $subsite,
$mode,
( $id ) x!! defined $id,
( $submode ) x!! defined $submode,
);
</code>
<p>we would now have</p>
<code>
my @part = (
'http://example.net/app',
grep( $is_admin_link. 'admin' ),
grep( defined($subsite), $subsite ),
$mode,
grep( defined($id), $id ),
grep( defined($submode), $submode ),
);
</code>
<p>I like it.</p>
<div class="pmsig"><div class="pmsig-29008">
<p align="right"><font size="-2">• another intruder with the mooring in the heart of the Perl</font></p>
</div></div>
745910
745922