That is what I wanted thanks,I prime the while with a print \ndate now I just have to figure out how to get my hash values into my db and I should be in good shape, one thing thats really throwing me for a loop is that the date is a string, and I am having trouble figuring out how to make it a sql small date time. someone sent me a link to sql standards the other day so much stuff not sure where to look first. I agree which is why I was trying to figure out how to add it to a %hash previously as a key, this is a one time issue, I will be recording values differently in the future so that hash is well formed so should not be an issue again. however my data.txt file did not contain a date label so my hash was not initialized properly I wanted columname->value, and date is columname now I need to fix my input files, then I should be able to use variables to loop through and get my records into the db. 
use Win32::ODBC;
use DBI;
$DSN="Ptest";
$db = new Win32::ODBC("DSN=Ptest;UID=ptalerter;PWD=Ha55le12;");
if(!($db)){
print "Error connecting";
exit;
}
else
{
print "Hey you are connected \n";
}
 $SqlStatement = "insert into AllResults (Date,Login,Searchload,Search
+Count,SearchResults,SearchSave,SearchDelete,SearchDetails,TaxLoad,Tax
+Results,TaxDetails,ClientAdd,CMALoad,CMASave,CMADelete,ClientDelete,L
+ogout) Values ('getdate()', '1','2','3','4','5','6','7','8','9','10',
+'11','12','13','14','15','16')";
 if ($db->Sql($SqlStatement)){
     print "SQL failed.\n";
     print "Error: " . $db->Error() . "\n";
     $db->Close();
     exit;
 }
 while($db->FetchRow()){
     undef %Data;
     %Data = $db->DataHash();
      print $db; 
     
 
 }
db->Close();
 
close file;

[download]

In reply to Re^2: inserting into file by grashoper
in thread inserting into file by grashoper

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.