Hi

         open (fh,"read.txt");
         while(<fh>){
           chomp;
           @columns = split('\\t',$_); <BR><BR>

           #.....You prepare the insert into statement and execute it 
+with the @columns with error checking and close the database's handle
+.....
           #to know more about the module you have installed that you 
+are using for the Database's connectivity to SQLServer , you have to 
+have <B> perldoc -m themodulename</B> or if you have not installed a 
+module first install a module (many in CPAN) and then instantiate , p
+repare and execute and finish the inserts to the database's schema 


         }
[download]

PLEASE send the program you have written , so that it will help to give suggestions