push(@output, %splitstring);

    return \@output;

my @data  = @{$cuser->get (\%find)};

my $i;
my %line;

for ($i = 0; $i < @data; $i++)
{
    %line = $data[$i];
        print $i.")".$line{'pass'}."\n";
}

    push(@output, %splitstring);
    return \@output;

    push(@output, \%splitstring); # hashref instead of flat list
    return \@output;

my %hash = %{$data[$i]};

    push(@output, %splitstring);

    return \@output;

    push(@output, { %splitstring }); # hier wird eine Referenz auf einen anonymen Hash mit dem Inhalt aus %splitstring angefügt.

    return \@output;

    %line = %{ $data[$i] }; # dereferenziert es wieder und kopiert den Inhalt in %line.

for ($i = 0; $i < @data; $i++)
{
    %line = %{ $data[$i] };
        print $i.")".$line{'pass'}."\n";
}

for my $hash_ref (@data) {
    print $hash_ref->{'pass'}, "\n" if exists $hash_ref->{'pass'};
}

    for $row (@array)
    {
        %splitstring = unstring($row);

       # hier kommt dann meine Prüfung..
    }