+ Responder ao Tópico



  1. Galera tenho um log no seguinte formato:

    MES-DIA-HORA-SERVICO-IP

    em linhas separadas quero percorrer isso linha a linha e inserir isso num BD MySQL,
    o comando pra inserir no banco seria assim:

    insert into ataques(mes,dia,hora,servico,ip) values(´$mes´,´$dia´,´$hora´,´$servico´,´$ip´

    quero saber o seguinte como percorrer o arquivo linha a linha e atribuir
    $mes=MES $dia=DIA,etc.... alguem tem alguma ideia??????? <IMG SRC="images/forum/icons/icon27.gif"> <IMG SRC="images/forum/icons/icon27.gif"> <IMG SRC="images/forum/icons/icon27.gif">

  2. #2
    Mr_Mind
    eu prefiro Perl! Instale o MySQL com suporte a Perl, depois instaleo Perl, depois o DBI e o DBD::MySQL (esses ultimos vc pode encontrar em cpan.org).

    depois disso leia a documentaçao do DBI::MySQL, e&acute; rapido, eu em um dia consegui meter o Perl a interagir com PostgreSQL.

    Mas adiantando ja o processo de aprendizagem...

    $ pico ataque.pl

    (digito o seguinte<IMG SRC="images/forum/icons/icon_smile.gif">

    #!/usr/bin/perl

    use Cwd;
    use DBI;

    $/="\r\n";
    $userid=0;

    $host = shift;
    $port= 3306;
    $db = shift;
    $user = shift;
    $pass = shift;


    # isto permitira&acute; que possa inserir dados noutra máquina

    if (($host eq "&quot<IMG SRC="images/forum/icons/icon_wink.gif"> || ($db eq "&quot<IMG SRC="images/forum/icons/icon_wink.gif"> || ($user eq "&quot<IMG SRC="images/forum/icons/icon_wink.gif"> || ($pass eq "&quot<IMG SRC="images/forum/icons/icon_wink.gif">){
    die "\nmodo de uso: perl db_conteudos.pl HOST NOME_DA_BD USER PASSWORD\n";
    }


    #ligar a BD
    $dbCon = DBI->connect("dbi:MySQL:dbname=$db;host=$host;port=$port",$user,$pass,{RaiseError >= 1, AutoCommit => 0}) or die "nao consegui ligar";


    #abrir ficheiro para parse
    my $ficheiro = "conteudo.txt";
    open (FILE, $ficheiro) or exit 1;
    @conteudo = <FILE>;

    foreach $linha (@conteudo){
    @parametros = split(/-/, $linha);

    # definir valores e inserir
    $mes = parametros[0];
    $dia = parametros[1];
    $hora = parametros[2];
    $servico = parametros[3];
    $ip = parametros[4];

    $strSql = "INSERT INTO ataques (mes,dia,hora,servico,ip) VALUES(&acute;".$mes."&acute;,&acute;".$dia."&acute;,&acute;".$hora."&acute;,&acute;".$servico."&acute;,&acute;".$ip."&acute";
    $rsSet = $dbCon->execute($strSql);


    #desligar da BD
    $dbCon->disconnect;

    print "Fim";


    Isso ja&acute; o deve ajudar em bastante, podera&acute; ter uma falha ou outra que você tera&acute; de descobrir. Qualquer coisa, vc sabe onde me encontrar grande amigo <IMG SRC="images/forum/icons/icon_wink.gif">






Tópicos Similares

  1. MOVIDO: script bash para backup
    Por Duca no fórum Servidores de Rede
    Respostas: 0
    Último Post: 09-06-2006, 19:12
  2. script bash para backup
    Por irado no fórum Linguagens de Programação
    Respostas: 3
    Último Post: 09-06-2006, 16:04
  3. Ajuda com script (bash)
    Por sarna no fórum Linguagens de Programação
    Respostas: 2
    Último Post: 08-03-2005, 21:42
  4. Script bash...
    Por sarna no fórum Servidores de Rede
    Respostas: 2
    Último Post: 08-03-2005, 21:23
  5. problemas com o Shell Script (bash)
    Por RafaelWood no fórum Linguagens de Programação
    Respostas: 4
    Último Post: 19-09-2003, 10:21

Visite: BR-Linux ·  VivaOLinux ·  Dicas-L