Select Code to Download

my $x;

...

$x = getValue() unless defined $x;

my @a;

...

@a = getValues() unless @a;

@a //= getValues();