所以我是Perl的新手,也是SQLite的新手.我有SQL经验,但这个新的Perl语法让我有点沮丧.
所以我有一个问题,我正在尝试使用Perl脚本从IPtable日志创建数据库来解析表所具有的数据并向人们发送通知.该脚本还向用户发送通知,但我不认为这与此问题有任何关系.
这是我收到的错误.
DBD :: SQLite :: db prepare failed:没有这样的表:syslog_decom_notif at ./send_notification_syslog.pl第251行.无法在./send_notification_syslog.pl第252行的未定义值上调用方法"execute".
下面是我收到错误的代码:
2 sub select_contacts {
233 my @contact_info;
234 my $dbh = DBI->connect( DECOM_NOTIFICATION_DB ,"","");
235
236 my ( $where_clause, @exec_params ) = build_where_clause();
237
238 my $SQL = <<SQL;
239 select
240 contact
241 , status
242 , contact_mngr
243 , hostname
244 , contact_type
245 , syslog_server
246 from
247 syslog_decom_notif
248 $where_clause
249 SQL
250 debug ( __LINE__ . " Excuting SQL = \n[ $SQL …Run Code Online (Sandbox Code Playgroud)