while (my $row = $sth->fetch()){
    push @{ $data[0] }, $row[0];
    push @{ $data[1] }, $row[1];
}

print Dumper(@data);