Select Code to Download

sub xx { wantarray ? ( qw/wrong wrong wrong/ ) : 'right' }

...
print xx() . '';

# use || or && did not work since they change my returned value

$x->zxy( 
  time => scalar( localtime ), 
  4 => scalar(qw/ 1 2 3 4 /)
);