Fråga : Tillfoga samlingtitelrader till CSV

Hälsningar att undra för I-förmiddag vad de riktiga kodifierar, formaterar skulle är att tillfoga kolonntitelraderna från samlingen in i CSVEN sparar.  Wilcoxon var trevlig nog att ge CSVEN skrivar som arbeten görar perfekt, och kodifiera är listat nedanfört.  Tack för din hjälp! > för

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:

" codeBody " " >use för class= " för ”, $out_file, då matrisen ”kunde inte skriva $out_file: $! ”; nr. referens DBDEN:: Oracle docs för den korrekta anslutningen stränger mitt $dbh = DBI->connect (...); nr. du behöver att ändra queryen till vad du önskar mitt $sql = ”vald col1, col2, col3 från bordlägger var x = y”; mitt $sth = $dbh->prepare ($sql); $sth->execute; min stunder ($row = $sth->fetchrow_arrayref) { trycket UT sammanfogar (”,”, kartlägga {G för s {”} {""}; ” \ ”$_ \ ""; } @$row),” \ n "; } $sth->finish; $dbh->disconnect; " klar "

Svar : Tillfoga samlingtitelrader till CSV

Det enklast långt att få kolonntitelraderna in i CSVEN (om inte genom att använda wildcardkolonner i den valda sqlen) skulle är att tillfoga en fodra efter fodrar 10:

skriv ut UT ”col1, col2, col3 \ n”; nr., allt vad kolonner du som är vald i sqlen på, fodrar 10

Att få kolonnen namnger är programmatically svårare (eg. Jag kan inte minnas av det bästa av mitt huvud, och att ska måste att se upp det).