Я пытаюсь загрузить файл CSV в базу данных mysql, используя perl.Мой Perl-скрипт будет находиться на сервере, к которому я буду обращаться через мой браузер.В браузере будет возможность загрузить файл.
Вопрос в том, как именно я это сделаю
- Нужно ли сохранять этот файл где-нибудь на сервере?и затем использовать его?
- Можно ли напрямую использовать файл с моего ноутбука, указав фиксированный путь?
, пока я пытался сделать это
if($update eq "fullLoad"){
$filename = param("customPricing");
my $upload_filehandle = upload("customPricing");
open ( UPLOADFILE, ">$filename" ) or die "$!";
binmode UPLOADFILE;
while ( <$upload_filehandle> )
{
print UPLOADFILE;
}
close UPLOADFILE;
$query = "LOAD DATA INFILE '\bigmac\bm_src\html\cgi-bin\testbrocade\$filename' INTO TABLE customPricingTest FIELDS TERMINATED BY ','";
$sth = $dbh->do($query) or die "SQL Error: $DBI::errstr\n";
print $sth . "Records Uploaded <br/>";
}
Отредактировано -> Выше кода выдает ошибку Доступ запрещен для пользователя.Я успешно могу создать файл на сервере, но похоже, что получаю ошибку при доступе к нему .. Есть идеи?
Спасибо, Nitesh