Hi,

--- On Tue, Nov 3, 2009 at 3:58 PM, Raman.P <raam...@yahoo.co.in> wrote:
| require DBI;
\--

Also to include:

  use strict;
  use warnings;

---
|           my $dbh = DBI->connect("DBI:CSV:");
\--

Need to always check for connection failure:

  my $dbh = DBI->connect( "DBI:CSV:" )
    or die "Couldn't connect to database: " . $dbh->errstr;

---
|           $sth = $dbh->prepare("SELECT * FROM passwd where login
like 'ram%'");
\--

One can also put the SQL query in a separate variable like:

  my $name = $dbh->quote( "ram%" );
  my $sql = qq/select * from passwd where login = '$name'/;

  my $sth = $dbh->prepare( $sql );

---
| while (@array=$sth->fetchrow_array()){
|        print "@array\n\n";
| }
\--

Use:

  while ( @array = $sth->fetchrow_array() ) {
      print "@array\n\n";
  }

SK

-- 
Shakthi Kannan
http://www.shakthimaan.com
_______________________________________________
To unsubscribe, email ilugc-requ...@ae.iitm.ac.in with
"unsubscribe <password> <address>"
in the subject or body of the message.
http://www.ae.iitm.ac.in/mailman/listinfo/ilugc

Reply via email to