my @arr = test();
my $molp = test();

sub test {
  my @mimamu = (1, 3, 7, 9, 11);
  return wantarray() ? @mimamu : $mimamu[0];
}