Using arrays of arrays it gets easier. Something like this:

my @list;
foreach (0 .. 5) {
  push (@{$list[$_]},"some text");
}
[download]

UPDATE: fix typo in code, thanks Happy-the-monk :)