perl - DBD::CSV: Returns header in lower case -

-

I have a problem with the module DBD :: CSV v0.30 after updating the new version From, all headers in fetch_hashref are fewer cases instead of mixed cases.

The Finili data will be committed to a MySQL database and the column header must be mixed case.

It is a snippet of my script using DBD :: CSV 

  My $ Csv_dbh = dbi- & gt; Connect ("DBI: CSV: F_DIIR = \. Csv_eol = \ n"); $ Csv_dbh- & gt; {F_dir} = $ ElementConfig-> {_ DIR} if defined ($ ElementConfig-> {_ DIR}); $ Csv_dbh- & gt; {Csv_sep_char} = "$ separator" if (defined ($ separator)); $ Csv_dbh- & gt; {Csv_eol} = $ csv_eol if (defined ($ csv_eol)); $ Csv_dbh- & gt; {Csv_allow_whitespace} = $ csv_allow_whitespace if (defined ($ csv_allow_whitespace)); My $ CSV_Select; Unless (defined ($ ref_FullSQLSt)) {// standard "SELECT * FROM filname.txt" $ CSV_Select = "SELECT". $ {$ Ref_CSV Select} "$ From File" $ {$ Ref_CSVWhere}; } And {$ CSV_Select = $ {$ ref_FullSQLSt}; } My $ sth = $ csv_dbh- & gt; Ready ($ CSV_Select); My $ res = $ sth- & gt; carry about (); While (my $ line = $ sth-> fetchrow_hashref ()) {my $ PKeys = $ index; ($ ElementConfig- & gt; {_ FILES} - & gt; {$ File} - & gt; {_dkey}) {my $ NewPKeys = ""; My $ key (partition (/ \ s * {If (defined) ($ line-> $ {Key} - {$ {$ FILE} - {ElementConfig- & gt; {_ FILES} - & gt; {$ file} - & gt; {_dkey}) }} {$ NewPKeys. $$ line-> {$ key};}} $ PKeys = $ NewPKeys if ($ NewPKeys);} {$ DATA->) {$ DataHash-> {$ DBConfig- & Gt; {TBLPREFIX} $ ElementConfig-> - & gt; {$ File} - & gt; {_ dtbl}} - & gt; {$ PKeys} = $ line; $ index ++;} }

This is a snippet of csv file: 

  CELL DATE avgRxLevUl avgRxLevDl RXQUALUL0 RTAL3D 08.12.2009 15:50 -96.25072834-92.32065149 179594

Really fetchrow_hashref looks like this: 

  $ var-> {'cell' => 'RTAL3D', 'Date' => '08 .12.2009 ',' avgrxlevu1 '=> -96.25072834 ...}

I have tried many things with the $ sth-> fetchrow_hashref () method I used the parameter "NAME", "NAME_lc" and "NAME_uc" first and second headers lowercase and the third Converts from uppercase to

Thank you for your help.

If you are using q (SELECT * FROM tbl), , SQL :: statement converts short case identifier. Due to some internal issues in processing it was necessary. To get mixed case column names, ask them with the names you need: 

  q (SELECT CELL, DATE, avgRxLevUl, avgRxLevDl, RXQUALUL0 to Tbl)

Comments

Post a Comment

Popular posts from this blog

paypal - How to know the URL referrer in PHP? -

-
I'm new to integrating PayPal with sites, so easily from the service I can use Can the available method be? What am I trying to do, when the user clicks on "Return to my website", I want my return URL to know that the referrer is PayPal so I can send it automatically to the homepage . how to do this? I tried $ _ SERVER ['HTTP_REFERER'] but it does not seem like anything. During the IPN conversation I set the cookie and session (though I am not sure whether I am correcting it or doing this right), but on returning to my website, it does not seem to recognize any session . If I use it by using $ _ SERVER ['HTTP_REFERER'] , then I'm afraid it's a security risk, is not it? If so, is there any other way I remember? help please. Should you really know the referrer? Set the PayPal Return URL to a "secret" URL which is always redirected to the homepage. If someone reaches there and gets redirected without coming from PayPal, then ...
Read more

oauth - Facebook OAuth2 Logout does not remove fb_ cookie -

-
This is used to work so I'm not sure what's wrong the user just logs in to Facebook properly Is capable of Logging problem. I log out the user logout by redirecting them to the php script. $ facebook-> GetLogoutUrl (); When users click on that link, they are logged out from the Facebook page. However, when they return to my site, I find that the FB_ cookie is still there. PHP SDK still gives user FB session details. The strange thing is that www.facebook.com shows that I am already logged out of Facebook. What can be wrong here? Thanks, I've been stumped: (. OK, finally, what did I do? > GetLogoutUrl () with a next = address url on my logout script which will remove the Facebook cookie by setSession (null) .
Read more

wpf - Line breaks and indenting for the XAML of a saved FlowDocument? -

-
Is there a way to format XAM generated when a flow document is saved? Currently, all of this is run simultaneously in one line, and I want to break it into my elements, with line break and indenting it makes it a little easier to read. Here is the code I'm using to save a FlowDocument in a WPF RichTextBox as a XAML file: // entire document around TextRange textRange Create a TextRange side = new TextRange (myRichTextBox.Document.ContentStart, myRichTextBox.Document .contentEnd); // save the file using the file (file stream fs = file. Create (filename)) {textRange.Save (fs, DataFormats.Xaml); } Savings work fine, but as I mentioned, JPAM has been generated, all this goes together, no indentation or line breaks for its various elements Is: & lt; Section xmlns = "http://schemas.microsoft.com/winfx/2006/xaml/presentation" xml: space = "preserve" Tekstelinement = "left" Lainhait = "auto" Hashipineshn = enabled = "false...
Read more