my $sel_array = $dbh->prepare("SELECT ELEMENT FROM ELEMENTS_TABLE WHERE ID=?");
$sel_array->execute($id);
my (@new_array) = map { $_->[0] } @{$sel_array->fetchall_arrayref};