You need a refresher

• perlintro
• Simple Module Tutorial
• perlsub
• Coping with Scoping

sub Something::something {
  return 0, 1,2,3,4, 5;
}
warn Something::something();
warn scalar Something::something();
warn "say ", ( Something::something() )[0,3];
my @stuff = Something::something();
warn "say @stuff ";
__END__
012345 at - line 4.
5 at - line 5.
say 03 at - line 6.
say 0 1 2 3 4 5  at - line 8.
[download]