(Perl) удаление из файла

Anna85
Дата: 29.08.2006 15:04:12
Разобралась со всеми переменными, все работает директории все прописаны, а данные из файла не удаляет помогите пожалуйста. Вот код для удаления:

$dbh = DBI->connect("DBI:CSV:f_dir=$Root/data") or die "Cannot connect: " . $DBI::errstr;
$sth = $dbh->prepare("DELETE * FROM document WHERE NUM='$d'") or die "Cannot prepare: " . $dbh->errstr();
$sth->execute() or die "Cannot execute: " . $sth->errstr();


А вот сам полный код программы:
Black
Дата: 29.08.2006 15:47:52
Anna85
а данные из файла не удаляет помогите пожалуйста

Такого не бывает... если что-то происходит не так, выдается ошибка ...
Anna85
Дата: 29.08.2006 16:08:49
Вот самый простой пример:

#!c:/perl/bin/perl
#!/usr/bin/perl             

use CGI;
use DBI;            

$Query = new CGI;
$syslog="c:/www/data/people";
$Query->charset('koi8-r');
print $Query->header;

$dbh = DBI->connect("DBI:CSV:f_dir=c:/www/data") or die "Cannot connect: " . $DBI::errstr;
$sth = $dbh->prepare("DELETE * FROM document") or die "Cannot prepare: " . $dbh->errstr();
$sth->execute() or die "Cannot execute: " . $sth->errstr();

Такая маленькая программка, заходишь на этот файл пустой листок, обновляешь и ничего не происходит, в смысле из файла ничего не удаляет
Black
Дата: 29.08.2006 16:11:16
идите и учите SQL, раз Вы игнорируете мои вопросы, отвечать более не буду ...
Anna85
Дата: 29.08.2006 16:20:31
Спасибо все заработало, нужно было просто звездочку удалить