Select Code to Download

 ( 'admin'  ) x !!$is_admin_link,

use strict;
use warnings;
...

@bar = ( 'bar', (@foo) x !!$cond, 'baz' );
print join(q{,},@bar), "\n";

bar,,baz
bar,baz