Пробую пользовать САБЖ вот что выдает:
./squid2mysql
"use" not allowed in expression at ./squid2mysql line 23, at end of line
syntax error at ./squid2mysql line 23, near "use DBI"
BEGIN not safe after errors--compilation aborted at ./squid2mysql line 24.
перл, MySQL установлены, ПОЧТИ ВСЕ!
может у кого похожая ситуация была?
Где собака зарыта?
>Пробую пользовать САБЖ вот что выдает:
>./squid2mysql
>"use" not allowed in expression at ./squid2mysql line 23, at end of
>line
>syntax error at ./squid2mysql line 23, near "use DBI"
>BEGIN not safe after errors--compilation aborted at ./squid2mysql line 24.
>перл, MySQL установлены, ПОЧТИ ВСЕ!
>может у кого похожая ситуация была?
>Где собака зарыта?надо поставить DBI и модуль mysql для DBI http://www.cpan.org
>
>надо поставить DBI и модуль mysql для DBI http://www.cpan.org$rpm -qa|grep DBI
perl-DBI-1.21-1]$ rpm -qa|grep DBD
perl-DBD-Pg-1.01-8
perl-DBD-MySQL-1.2219-6
perl-DBD-CSV-0.1027-1.asp
perl-DBD-MySQL2-2.0901-1.aspЧего не хватает?
>
>>
>>надо поставить DBI и модуль mysql для DBI http://www.cpan.org
>
>$rpm -qa|grep DBI
>perl-DBI-1.21-1
>
>]$ rpm -qa|grep DBD
>perl-DBD-Pg-1.01-8
>perl-DBD-MySQL-1.2219-6
>perl-DBD-CSV-0.1027-1.asp
>perl-DBD-MySQL2-2.0901-1.asp
>
>Чего не хватает?
все на месте.
но это инфа об пакетах которая прописана в /var/lib/rpm/. а фактически то DBI в perl есть? /usr/lib/perl5/ там то есть?
ls /usr/lib/perl5/site_perl/5.6.1/i386-linux/DBI/*
Changes.pm
DBD.pm
FAQ.pm
Format.pm
ProfileData.pm
ProfileDumper.pm
Profile.pm
ProxyServer.pm
PurePerl.pm
Shell.pm
W32ODBC.pmConst:
GetInfo
GetInfoReturn.pm
GetInfoType.pmDBD:
Metadata.pmProfileDumper:
Apache.pmSQL:
Nano.pmЧто еще смотреть?
>ls /usr/lib/perl5/site_perl/5.6.1/i386-linux/DBI/*
>Changes.pm
>DBD.pm
>FAQ.pm
>Format.pm
>ProfileData.pm
>ProfileDumper.pm
>Profile.pm
>ProxyServer.pm
>PurePerl.pm
>Shell.pm
>W32ODBC.pm
>
>Const:
>GetInfo
>GetInfoReturn.pm
>GetInfoType.pm
>
>DBD:
>Metadata.pm
>
>ProfileDumper:
>Apache.pm
>
>SQL:
>Nano.pm
>
>Что еще смотреть?незнаю. щас гляну.
у меня вот тут лежит /usr/lib/perl5/site_perl/5.6.1/i386-linux/DBI.pm
и вот тут /usr/lib/perl5/site_perl/5.6.1/i386-linux/auto/DBI/простой скрипт для проверки.
#!/usr/bin/perl
use DBI;
print "OK\n";
>#!/usr/bin/perl
>use DBI;
>print "OK\n";Результат -
ОК
>
>>#!/usr/bin/perl
>>use DBI;
>>print "OK\n";
>
>Результат -
>ОК
тогда надо смотреть squid2mysql
>тогда надо смотреть squid2mysql
Вырезка
cat squid2mysql
...
use DBI; line 23
use DBI::DBD; line 24
...
>
>>тогда надо смотреть squid2mysql
>Вырезка
>cat squid2mysql
>...
>use DBI; line 23
>use DBI::DBD; line 24
>...наджо весь посмотреть. так ничего не говорит, кроме того. что DBI нет, но мы выяснили что есть. где его взять можно squid2mysql желательно прямо тот который у вас.
>прямо тот который у вас.