Stránka 1 z 1

Authme mysql

Napsal: 20 srp 2012, 21:16
od OnlyLuckCZE
Server: 93.91.250.120:27775

Ahoj, potřeboval bych dát authme na mysql, ale nechci ztratit registrace....
Z jiných témat jsem našel tento script: https://github.com/whoami-plugins/authm ... o_mysql.pl
Když ho nahraju na web a spustím i s příponou .pl tak mu to nabídne stáhnutí...
proto se ptám... jak ten script spustím? Předem děkuji za každou odpověd :)

Popřípadě...
Spoiler: zobrazit

Kód: Vybrat vše

#!/usr/bin/perl

use strict;
use warnings;
use DBI;

##############################
# EDIT THESE CONFIG SETTINGS #
##############################

my $host = "loki.fakaheda.eu";
my $database = "gs_27775_1";
my $username = "gs_27775_1";
my $password = "heslo";
my $auth_file = "/auths.db";

###############################
# DO NOT EDIT BELOW THIS LINE #
###############################

open FILE, "$auth_file" or die $!;
my $dbh = DBI->connect("DBI:mysql:$database;host=$host", "$username", "$password") or die "Could not connect to database: $DBI::errstr";

$dbh->do('CREATE TABLE `authme` (
         `id` INTEGER AUTO_INCREMENT,
         `username` VARCHAR(255) NOT NULL,
         `password` VARCHAR(255) NOT NULL,
         `ip` VARCHAR(40) NOT NULL,
         `lastlogin` BIGINT,
         CONSTRAINT `table_const_prim` PRIMARY KEY (`id`));');

my $st = 'INSERT INTO `authme` (`username`, `password`, `ip`, `lastlogin`) VALUES ';
my $i = 0;

while(<FILE>) {
    if($i == 1000) {
        $i = 0;
        $dbh->do($st);
        $st = 'INSERT INTO `authme` (`username`, `password`, `ip`, `lastlogin`) VALUES ';
    }
    my @auth = split(':');
   
    if($i != 0) {
        $st .= ", ";
    }
   
    $st .= "(\"$auth[0]\", \"$auth[1]\", ";
    $st .= "\"" . ($auth[2] || '198.18.0.1') . "\", ";
    $st .= ($auth[3] || '0') . ")";
    $i++;
}

if($i > 0) {
    $dbh->do($st);
}

$dbh->disconnect();
close FILE;


Re: Authme mysql

Napsal: 20 srp 2012, 21:27
od Welton123
Spust to tim, že najedeš na url adresu toho scriptu.

Re: Authme mysql

Napsal: 20 srp 2012, 22:50
od nejento
Weltone:
Když ho nahraju na web a spustím i s příponou .pl tak mu to nabídne stáhnutí...


Tohle není PHP skript ale Perl skript.

Re: Authme mysql

Napsal: 21 srp 2012, 00:49
od tes
To tak jedině napsat někomu z FakaHedy ať ti ten script zkusí spustit...

Re: Authme mysql

Napsal: 22 srp 2012, 00:01
od OnlyLuckCZE
a nevěděl by někde o nějakém jiném způsobu? :)

Re: Authme mysql

Napsal: 22 srp 2012, 10:45
od nejento
Ruční přepisování.