my @queue;
# schleife
    my $row = ...;
    push @queue, $row;
...
# später elemente in @queue ausgeben