my ($tuple) = map { @{ $_ } } $dbh -> selectall_arrayref("select col1 from table1 where col1 = co l2 and col2 != '$someval'");