R
Size: a a a
R
R
AP
АК
return func($x);
my(@res) = func($x);
mystuff();
return @res;
IB
return func($x);
my(@res) = func($x);
mystuff();
return @res;
DF
DF
АК
IB
wantarray
в сабе использоватьАК
IB
IB
SZ
return func($x);
my(@res) = func($x);
mystuff();
return @res;
SZ
АК
SZ
wantarray
в сабе использоватьАК
our $deep;
f_start();
sub f_start
{
$deep = 0;
say f_body();
}
sub f_body
{
say $deep;
if($deep>5){
return -1;
}
{
local $deep;
$deep++;
return f_body();
$deep--;
}
}
SZ
our $deep;
f_start();
sub f_start
{
$deep = 0;
say f_body();
}
sub f_body
{
say $deep;
if($deep>5){
return -1;
}
{
local $deep;
$deep++;
return f_body();
$deep--;
}
}
АК