Страница 1 из 1

При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 11:56:40
GANS
Местный скрипт вылетает с ошибкой на 13 строку, типа не может выполнить use Mysql; и выдает несколько путей, по которым его действительно нету, она в DBD
как прикрутить умело подскажите пожалуйста
В шельном скрипте, если я всё правильно понял, прописана переменная с указанием пути к бинарнику

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 11:57:32
Alex Keda
из портов поставить?

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 12:08:05
GANS
Не не, я поставил всё из обновленных портов, (огромное спасибо ресурсу!) postfix закрутился уже (поздно заметил заметки про жалательнее exim), в ipacctd логи идут...
Я про скрипт для перегона в БД: перловый скрипт при запуске не может найти Mysql модуль, если я правильно понял: перловый скрипт использует (13 строчка - use Mysql;) перловый модуль Mysql.pm. Но при запуске он его не находит (выдает пути, по которым его действительно нету, он находится в ещё более глуюже вложеной папке DBD)

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 14:59:49
Alex Keda

Код: Выделить всё

uname -a

Код: Выделить всё

pkg_info | grep ysql

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 15:39:23
GANS

Код: Выделить всё

FreeBSD freeha.xxxx.ru 6.2-RELEASE-p10 FreeBSD 6.2-RELEASE-p10 #0: Mon Feb  4 17:42:22 NOVT 2008     root@freeha.xxxx.ru:/usr/obj/usr/src/sys/serv_GANS  i386

Код: Выделить всё

bsdpan-DBD-mysql-4.006 DBD::mysql - MySQL driver for the Perl5 Database Interface 
courier-authlib-mysql-0.60.2 MySQL support for the Courier authentication library
mysql-client-4.1.22 Multithreaded SQL database (client)
mysql-scripts-4.1.22 Multithreaded SQL database (scripts)
mysql-server-4.1.22 Multithreaded SQL database (server)
p5-DBD-mysql41-4.006 MySQL 4.1 driver for the Perl5 Database Interface (DBI)
php5-mysql-5.2.5_1  The mysql shared extension for php
php5-mysqli-5.2.5_1 The mysqli shared extension for php
+

Код: Выделить всё

bsdpan-DBI-1.602    DBI - Database independent interface for Perl
p5-DBI-1.60.1       The perl5 Database Interface.  Required for DBD::* modules
распаковал порт и перлом доинсталил по дубликату на DBD и DBI
бестолку, начал по ману скрипт менять на DBI команды, все равно: то коннект не найдет, то ещё че...
хотя в lib/perl5/site_perl/5.8.8/mach/DBD есть mysql.pm

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-15 15:53:10
GANS
Can't locate Mysql.pm in @INC (@INC contains: /usr/local/lib/perl5/5.8.8/BSDPAN /usr/local/lib/perl5/site_perl/5.8.8/mach /usr/local/lib/perl5/site_perl/5.8.8 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/5.8.8/mach /usr/local/lib/perl5/5.8.8 .) at ./traffic.PL line 13.
BEGIN failed--compilation aborted at ./traffic.PL line 13.

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-28 14:47:02
GANS
подскажите хоть то ли я установил и туда ли я копаю

сервак перелопатил, теперь он p11, в make впердолил PERL_ARCH=mach(не было) - итог: ноль эмоций в моём направлении

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-28 21:33:08
ProFTP
может глюк из старым мускулом и новым драйверов

найди файлы которые входяд в тот модуль(и) и загрузи

Код: Выделить всё

require /полный/путь/к/Mysql.pm; 
типо так...

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-28 21:38:56
hizel
пардон
но

Код: Выделить всё

use Mysql
древность несусветная, так мой дедушка писал :twisted:

сейчас так

Код: Выделить всё

use DBI;
my $dbh = DBI->connect("DBI:mysql:host=$server;database=$db","$user","$password") or die 'can\'t connect sql server :(';

my $sth = $dbh->prepare('insert octets(time_event,identify_id,up_bytes,up_packets,down_bytes,down_packets) values(FROM_UNIXTIME(?),?,?,?,?,?)') or die 'can\'t prepare sql';

$sth->execute($time_event,$i_id,$in_bytes,$in_packets,$out_bytes,$out_packets);

$dbh->disconnect();
$sth->finish();
общий принцыап должен быть понятен

Re: При работе скрипта на perl к ipacctd

Добавлено: 2008-02-29 2:35:06
Alex Keda
не стреляйте в музыкантов, они играют как умеют
(я про себя =))