my @return = () ;
  ...
  push @return, $a, $b ;
  ...
  push @return, $c, $d ;
  ...
  return @return ;