yes. i already tried it.
[EMAIL PROTECTED] writes:
>I could be wrong but have you tried "\.prog" instead.
>
>adrian
>
>-----Original Message-----
>From: Perl DBI [mailto:[EMAIL PROTECTED]]
>Sent: Thursday, 12 July 2001 16:09
>To: [EMAIL PROTECTED]
>Subject: .htpasswd and DBD::CSV
>
>
>how can i connect to .htpasswd using DBD::CSV? particularly those file
>with period (.) at the beginning.
>
>this is the error im getting.
>
>DBD::CSV::db prepare failed: Parse error near .prog where
>progname='Prepaid Domains' at /usr/lib/perl5/site_pe
>rl/5.005/DBD/File.pm line 164.
>Can't call method "execute" on an undefined value at choose.pl line 17.
>
>and this is my code
>
>my ($table) = ".prog";
>my ($dbh) = DBI->connect("DBI:CSV:");
>$dbh->{'csv_tables'}->{$table} =
> {
> 'col_names' => ["progname", "progfile", "groups"],
> 'eol' => "\n"
> };
>
>my($query) = "SELECT * FROM $table where progname='Prepaid Domains'";
>my($sth) = $dbh->prepare($query);
>$sth->execute;
>while ($row = $sth->fetchrow_hashref) {
> print "$row->{'progname'}, $row->{'progfile'}, $row->{'groups'}\n";
>}
>$sth->finish;
>$dbh->disconnect;
>
