summaryrefslogtreecommitdiffstats
path: root/scripts/mysqlurllogger.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/mysqlurllogger.pl')
-rw-r--r--scripts/mysqlurllogger.pl10
1 files changed, 5 insertions, 5 deletions
diff --git a/scripts/mysqlurllogger.pl b/scripts/mysqlurllogger.pl
index 2c6d4fa..4a06b83 100644
--- a/scripts/mysqlurllogger.pl
+++ b/scripts/mysqlurllogger.pl
@@ -13,7 +13,7 @@
#| line | char(255) | YES | | NULL | |
#+-----------+---------------+------+-----+---------+-------+
-
+use strict;
use DBI;
use Irssi;
use Irssi::Irc;
@@ -30,13 +30,13 @@ $VERSION = "1.0";
url => "http://nchip.ukkosenjyly.mine.nu/irssiscripts/",
);
-$dsn = 'DBI:mysql:ircurl:localhost';
-$db_user_name = 'tunnus';
-$db_password = 'salakala';
+my $dsn = 'DBI:mysql:ircurl:localhost';
+my $db_user_name = 'tunnus';
+my $db_password = 'salakala';
sub cmd_logurl {
my ($server, $data, $nick, $mask, $target) = @_;
- $d = $data;
+ my $d = $data;
if (($d =~ /(.{1,2}tp\:\/\/.+)/) or ($d =~ /(www\..+)/)) {
db_insert($nick, $target, $1);
}