eh so vc usar o codigo acima postado e pela url acessar o endereço index.cgi?pagina=cgi q ela ira abrir a nome.htm

sendo que o nome eh o que vem depois de pagina=

Poste mais informações.

Qual o seu sistema operacional ?
Qual perl voce instalou para testes ?
Esta testando isso em seu computador pessoal ou em um servidor de hospedagem ?

nao isso nao eh um sistema de cadastro.

como diz no topico eh so um exemplo de como fazer um top 10 lendo um banco de dados.

Funciona sim.

Mas ali nao esta listando todos os ips que sao do brasil ali so tem 1 ip que eh o padrao.

voce teria que adicionar todos os outros adicionando:

if($ip =~ /200/){ # ve se tem o 200 nesses 4 primeiros digitos
print "Você esta se conectando do Brasil"; # Se siver, ok
#adicionando aqui:
}elsif($ip =~ /201/){
print "Você esta se conectando do Brasil";

}else{
print "Você não esta conectado pelo Brasil"; # se nao, avisa
}

ou dessa maneira:

if($ip =~ /200/ or $ip =~ /201/ or $ip =~ /143/){ # ve se tem o 200 nesses 4 primeiros digitos
print "Você esta se conectando do Brasil"; # Se siver, ok
}else{
print "Você não esta conectado pelo Brasil"; # se nao, avisa
}

estou sem hospedagem para este site temporariamente mas em breve devo re-colocar no ar.

Olá, queria saber onde posso aprender CGI/Perl.
Desde que seja em português é claro...
Alguém sabe?

http://www.wmonline....br/?area=cursos

#!/usr/bin/perl



use CGI; # Carrega modulo cgi



$query = NEW CGI; # Cria a variavel do modulo

$paginas=$query->param('pagina'); # Cria a variavel



print "Content-type: text/html\n\n"; # Impressão





if ($paginas eq "cgi") { # faz as comparações

open(A,"$paginas.html");

@pagina = <A>;

close(A);

print "@pagina";

}elsif ($paginas eq "dicas") {

open(A,"$paginas.html");

@pagina = <A>;

close(A);

print "@pagina";

}else{ # Caso não digite nada

print " Por favor, escolha uma pagina!!!";

}

sim mas se a janela eh um window open sem, address pode adiantar forçando ele a fecha-la ai teria como fazer isso(captar o click no X do fechar.) ?

se voce utilizar
$variavel =~ s/\.|-//g;

utilizando uma | no meio ele ira considerar como . ou - assim ira remover os pontos e traços que estiverem também separados.

Crie um arquivo .txt com todo o conteudo de textos padroes em uma lingua.
faça a leitura deles por linha exemplo:

entra aqui o $texto[123].

faça uma pesquisa por url no tradutor google usando lwp::simple
sendo a url o endereço do seu txt com todas as falas.

um exemplo:
"http://translate.goo...language_tools"

e salve como linguatal.txt

assim voce pode fazer um banco de dados de todas as linguas, que o google traduz automaticamente.

e esse processo so precisar ser feito 1 vez para gerar os novos bancos de dados a partir do seu banco principal.

apos ter feito isso faça um dropdown para selecionar a lingua desejada ou algo do tipo leia o diretorio onde tem os txt e adiciona as opçoes conforme o numero de txts.

exemplo tem 4 txts sendo eles
abc.portugues.txt
abc.ingles.txt
abc.jopones.txt
abc.espanhol.txt

ai cria um drop down com esses 4 sendo que voce pode filtrar o nome do arquivo e pegar somente o portugues, japoenes etc.

pronto a partir dai o seu sistema ira ler todas as linhas traduzidas na lingua seleciona.


$lingua = $form{'lingua'};

if $lingua eq 'japones' { require 'lingua.japones.txt'; }

para este tipo de informação se ele leu ou nao voce tem q fazer uma verificação tipo apos ele entrar em uma determinada mensagem gerar um txt por exemplo:

id_do_email|lido

ai todos que tiverem id lido ele marca como lido e os outro como nao lido, seria algo do genero.

olha você deveria posta os codigos no google antes de postar aqui pedindo que descriptografem pois sao ridiculos.

sendo que voce disse q o segundo eh mais complexo aqui vai ele.

Foi encontrado no google numa das primeiras paginas de resposta usando a pesquisa "function process(ar)"

Teste de Criptografia

Existe um mensagem entre:

<!-- Oculta -->

Se alguém descriptografar poste.

como ? encontre e altere a linha:
document.write(Stri)
Stri=''
para
// document.write(Stri)
// Stri=''
alert(Stri.valueOf())

ele ira abrir a pagina como se fosse um alerta e no alerta todo o codigo html estara la.

tem outros meios, vc pode fazer ele gerar um txt com todo o codigo por exemplo.

esqueci de colocar o outro codigo mas nem vo colocar q nem do de cima nao, vejam o link:
http://scriptasylum....ode-decode.html
para o 1 codigo.

em resumo html / javascript sao 0 a esquerda para codificar.

http://www.mattsscri...wnload.pl?fid=1

pensei furadamente na logica ehhe

tipo vc tem q colocar inicialmente a margem.

ex: anomesdia

pois assim ele tem como fazer a comparação

se vc coloca dia mes separados eles nao tem como verificar pois um dia sempre sera menor de um lado e maior do outro o que provocaria um chock.

$diamesinicio = "0601";
$diamesfinal = "0602";

($seg,$min,$hora,$diam,$mes,$ano,$sdia,$diano,$isdst) = localtime(time);
@nummeses = ("01","02","03","04","05","06","07","08","09","10","11","12");
$ano += 1900;
$data = "@nummeses[$mes]$diam";
print "Content-Type: text/html\n\n";
if (($data >= $diamesinicio) && ($data <= $diamesfinal)) {
print "funciona bem quando vc esta dentro do mes.\n\n";
} else {
print "O mes/dia de funcionamento ja passou.\n\n";
}

ou

$diamesinicio = "20050601";

$diamesfinal = "20050602";

($seg,$min,$hora,$diam,$mes,$ano,$sdia,$diano,$isdst) = localtime(time);
@nummeses = ("01","02","03","04","05","06","07","08","09","10","11","12");
$ano += 1900;
$data = "$ano@nummeses[$mes]$diam";
print "Content-Type: text/html\n\n";
if (($data >= $diamesinicio) && ($data <= $diamesfinal)) {
print "funciona bem quando vc esta dentro do mes.\n\n";
} else {
print "O mes/dia de funcionamento ja passou.\n\n";
}

pra falar verdade a mais simples foi a do nan porem a minha tem certa personificações q podem ser feitas.

a do nan seria mais pratica pois nao teria necessidade de modulo eh so pegar dos dados e colocar naquele formato.

(o bom é sempre tentar fazer sem precisar de dependecias de modulos. pois nunca sabemos quando precisaremos de algo stand alone q podemos jogar no diretorio ou algo direto do perl que nao pode ser instalado)

if ($dia >= $diainicio and $mes >= $mesinicio and $dia <= $diafinal and $mes <= $mesfinal) { faz isso } else { nao faz nada }

also assim ?

o cadastro do ip so eh relacionado ao provedor no momento mas eles ja estao implementando, algumas classes por exemplo da aol, a aol nao fornece a localidade por questao etica entao ele pega somente de onde o link sai, ou seja de qual provedor da aol ele sai.

dando assim a localidade erronea.

Mas os liberados a cadastro na maioria das vezes exibe seu dados corretos.

Se não está imprimindo nada, talvez o seu ip não esteja no banco de dados do sistema.
O fato é que não existe maneira de se saber o pais de origem de um ip de forma automática. Então é criado um banco, onde se cadastram ip's e paises relacionados, porém nem todos os ips estão lá (alias, do Brasil, até onde eu vi a um tempo atrás, tem bem pouco).
O que dá pra fazer realmente é ter informações do browser do usuário, como versão, idioma, etc.

Nao exatamente, os ips saem de um classe q eh de autonomia de um provedor o q o sistema faz eh cadastrar a base e relacionar ao provedore tendo a localidade entao o maximo q pode acontecer eh de o ip estar relacionado a um localidade erronea.

Mas todos sao cadastrados !

1. o linux nao executa arquivos do windows a menos q tenha um emulador ou um depurador especifico.

2. /usr/bin para usar isso seu arquivo deve estar dentro desta pasta

3. /usr/bin eh como se fosse no windows c:/usr/bin

4. o que o status.exe faz ? as vezes voce pode pegar um arquivo para linux q faça o similar.

hhahahaha neh igual jogo de rpg nao

mas eh algo a mais de conhecimento com certeza.

espero q de certo (minhas ideias sempre dao) hauhauhuah.

Go Go Go WebForum Team =D

Esse vai ser o trabalho mais difícil deste Grupo de promoção.

Pois ficaria a cargo dele a busca de apoiadores para o desafio, sendo que Host acredito que nem pensar como prêmio, devido a direitos exclusivos com a Hostnet.

Mas seria legal uma pessoa encarregada de ir atraz de apoiadores e patrocinadores para premios bons e tals ...

É uma boa idéia, mas para se transformar num projeto tem que ser muito bem estudada.

cabe a voces discutir isso e estruturar =D dei o ponto inicial e passei a bola =D

espero q sai e de certo =D boa sorte

Exato tipo, o moderador da seção monta desafio e regras e prazo.

O promotor monta premios, organiza os participantes mande email pros membros, deixa recadados, e adminsitra o andamento do mesmo.

recebe os projetos organiza a publicação os votos, procura pessoas adequadas para fazer analises etc.

Balala realmente como voce disse sempre 1 ou 0 participantes mas como o bruno disse falta promoção nos eventos alguem pra ficar atras pois quem cria os desafios etc moderadores ? nao tem como, eles ja te coisa de mais pra fazer.

Se começa a ser toda vez mais organizado e mais elaborado com gente so em cima disso.

Pode da certo.

A frequencia de poucos ira divulgar e trazer varios.

Mas nao vai ser facil. ninguem falou q seria... eh uma ideia nova pra voces e se sentarem e pensarem direito pode valer a pena alem de trazer mais frequencia e publico.

Vcs tendo uma promoçao grande podem conseguir ate premios mais reais como curso de alguma coisa sei la.

O interessante de ter os promotores eh q eles podem correr atras de premios melhor do hospedagem camisa etc...

podem arrumar parcerias e ate premios legais.

Ate mesmo um emprego com um salario bem remunerado pro ganhador hehehehe

de uma ideia pequeno pode vir muita coisa ... no inicio começa do chao... mas depois ...


PS: vlw ai galera q deu apoio a minha ideia futil >D

vc nao entendeu eh por isso mesmo q o forum precisa desse grupo como vc mesmo disse agora ta na ponta da agulha mas ainda no papel !!

esse grupo eh exatamente pra q nao fique na ponta da agulha.

E para q sempre tenha um pessoal so pra isso q nao tenha q ficar moderando !! como o bruno mencionou.


FOra q com esse grupo vc nao iria precisar de entrar nas areas e ler E ai nao vai desafio ? e ai esse desafio nao sai ? e ai esse nao vai pra frente cabo mesmo ?

ja cansei de ler isso aqui.

Acho muito legal a equipe q sempre ta ai pra ajuda e tudo mais ... mas acho q nao eh hora de promover gente para uma determinado posto nao acho q voces devia pensar em criar uma nova classe como Promotores.

Que teriam a especialidade de criar eventos pois o forum ta precisando de eventos em todas as areas. mas um promotor bom fazer sempre eventos com premiação desde premiação pequenas a premiação grandes.

Acho q falta isso aqui pois tem de tudo, qualidade, equipe, usuarios colaboradores.

MENOS EQUIPE PROMOTORA.

de q adianta varios monitores, varios admins, varios moderadores.

Se nao tem o principal pra mandar o forum pras estrelas... PROMOTORES.

o forum eh 1000 podia ser 100.000.

minha sugestao =P leiam com carinho.

PS: moderados criando desafio e tudo eh 10 mas um promotor arrumando isso conversando com o moderados e bump pra frente acho q eh melhor faz com q o projeto va mais rapido pro executar e deixe de ser um papel uma ideia.

[]´s