|
|
|
новичок
      
участник
Last Login: 24.06.2004 14:55
Сообщ.: 2,
Visits: 23
|
|
Джентльмены, а можно на перле реализовать вот такую фичу?
#!/usr/bin/perl use strict; use DBI(); my $dbh = DBI->connect("DBI:mysql:database=ip_accounting;host=localhost","root", "",{'RaiseError' => 1}); my $query = "source /usr/local/cisco-ip/Scripts/traf.sql"; $dbh->do($query); $dbh -> disconnect;
Т.Е. я хочу выполнить несколько запросов и писать их в traf.sql но в ответ получаю
DBD::mysql::db do failed: You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near 'source /usr/local/cisco-ip/Scripts/traf.sql' at line 1 at ./reportcreator line 6.
|
|
|
|
|
Supreme Being
      
участник
Last Login: 27.10.2005 15:21
Сообщ.: 120,
Visits: 1 321
|
|
| system("mysql -u user -p passwd database < /pah_to_sql/sql.sql");
|
|
|
|
|
новичок
      
участник
Last Login: 24.06.2004 14:55
Сообщ.: 2,
Visits: 23
|
|
|
|
|