sub doSomething
{
  ...
  return 0;

  if (@_) { ... }
  ...
  ...
}

##</code><code>##

for (my $i = 0; $i < 2000; $i++)
{
  last if ($i & 1024);
  ...
}

##</code><code>##

if ($MyVALUE)
{
  return 4;
}
else
{
  return 5;
}

##</code><code>##

if ($MyVALUE) { return 4; }
return 5;

##</code><code>##

return $MyVALUE ? 4 : 5;

##</code><code>##

my $A = 0;
my $B = 0;
my $C = 0;

# EXAMPLE A:
   if ($V == 0) { $A = 5;   $B = 39; $C = 0;   }
elsif ($V == 1) { $A = 0;   $B = -1; $C = 188; }
elsif ($V == 2) { $A = 101; $B = 18; $C = 19;  }

# EXAMPLE B:
my $LUT = "\6(\1\1\0\xBDf\x13\x14";
$A = vec($LUT, $V*3, 8)-1;
$B = vec($LUT, $V*3+1, 8)-1;
$C = vec($LUT, $V*3+2, 8)-1;

# EXAMPLE C:
($A,$B,$C)=map($_-40,unpack('x'x($V*3).'CCC',"-O(('\xe4\x8d:;"));