- Fórum WMO
- → prix's Content
prix's Content
There have been 110 items by prix (Search limited from 10/05/2023)
#724545 Nome Para Site De Um Jogo De Crimes
Posted by prix on 28/03/2006, 11:50 in BrainStorm Desenvolvimento
hauhauahuahu
#719995 Script Não Soma Casa Decimais ...
Posted by prix on 17/03/2006, 14:28 in CGI/Perl
$inteiro = 5;
$parte = 2.5346;
sprintf("%d", $inteiro); # imprime o numero inteiro
sprintf("%03d", $inteiro); # formata o numero em 3 casas a esquerda, 005
sprintf("%2.2f", $parte); # formata o numero em 2 casas a esquerda e 2 casas a direta
sprintf("%.2f", $parte); # formata o numero em 2 casas a esquerda e deixa como esta qualquer casa acima.
#717928 Trabalhando Com $$$ No Perl
Posted by prix on 13/03/2006, 13:06 in Banco de Funções CGI/Perl
$total = sprintf("%.2f",($total + $preco));
#697735 Ao Gravar Saida Para Arquivo Ele Da Espaço
Posted by prix on 01/02/2006, 06:23 in CGI/Perl
^ pega so o que começa com algo.
http://en.wikipedia....ession_examples
So para informar acho q os espaços estão vindo por falta de chomp tenta fazer isso usando chomp... no foreach, e depois adicionando \n se preciso
#695762 O Que Significa O "-x" ?
Posted by prix on 28/01/2006, 01:51 in CGI/Perl
em outras palavras pega o texto colocado (em e/ou antes) #! e entra no diretorio
coloquei em e/ou antes mas creio que seja exatamente o texto colocado em #! exemplo #!c:/teste
perl -h = mostra as opções que voce tem e o que fazem
#695049 Como Crio Um Sitema De Redirecionar
Posted by prix on 26/01/2006, 16:09 in CGI/Perl
#!/usr/bin/perl $seusite = 'http://www.seusite.com.br'; $nome=$ENV{'HTTP_HOST'}; $nome=lc($nome); @url = split(/\./,$nome); if($url[0] eq 'www'){ $url[0]=$url[1]; } $url=$url[0]; print "Content-type: text/html\n\n"; print qq| <html> <head> <title>TITULO DA PAGINA</title> <meta description="DESCRIÇÃO"> <meta keyword="PALAVRAS CHAVE"> </head> <frameset rows="100%,*" FRAMESPACING=0 FRAMEBORDER=0 BORDER=0> <frame src="$seusite/$nome" NAME="MAIN_FRAME" SCROLLING="AUTO" NORESIZE FRAMEBORDER=0 BORDER=0 MARGINHEIGHT=3 MARGINWIDTH=3> </frameset></html>|;
#695046 Data
Posted by prix on 26/01/2006, 16:02 in CGI/Perl
$data = '03/11/2005'; $adiciona = 90; ($dia,$mes,$ano) = split (/\//,$data); $dia = $dia + $adiciona; if ($dia > 29 && $dia < 60) { $dia = $dia - 30; $mes = $mes +1; if ($mes > 12) { $mes = '01'; } } if ($dia > 59 && $dia < 90) { $dia = $dia - 60; $mes = $mes +2; if ($mes > 12) { $mes = '02'; } } if ($dia > 89 && $dia < 120) { $dia = $dia - 90; $mes = $mes +3; if ($mes > 12) { $mes = '03'; } } $data2 = "$dia/$mes/$ano"; print "$data2\n";
#695043 Data
Posted by prix on 26/01/2006, 15:58 in CGI/Perl
module:
http://search.cpan.o...lib/DateTime.pm
calculos:
http://datetime.perl...pleCalculations
#694942 Como Crio Um Sitema De Redirecionar
Posted by prix on 26/01/2006, 14:19 in CGI/Perl
wildcard eh configurado no named(bind) e no apache(httpd).
Pesquise no google por wildcard ou ate mesmo aqui no forum você deve achar algo sobre.
"Todos os servidores com cpanel se tiverem um administrador descente pode ser fornecido o serviço de wildcard"
#688803 Sistema De Chat Que Informa
Posted by prix on 15/01/2006, 02:41 in Artigos, Dicas e Tutoriais de CGI/Perl
pois quando o cara envia a mensagem eh q o sinal de escrevendo uma mensagem eh enviado...
com ajax ele poderia ser enviado em tempo real.
#687936 Sistema De Chat Que Informa
Posted by prix on 13/01/2006, 12:40 in Artigos, Dicas e Tutoriais de CGI/Perl
Não tem nem um ajax para trabalhar em real time enviando as informações...
o java script parece ok, para pegar o evento de estar digitando...
Mas o codigo não esta parecendo correto.
ja tentou ele com ajax ?
#681338 Cookie....
Posted by prix on 30/12/2005, 15:59 in CGI/Perl
voce pode controlar se o usuario entrou ou nao, quantas vezes ele errou a senha ou nao e bloquea-lo, dentre outras coisas que podem ser feitas de uma maneira mais simples.
com o cookie o cookie por ser roubado e dependendo de como eh criado pode ser reproduzido.
o cookie nem sempre funciona para todos os usuarios, dependendo de spybot e outros programas os cookies tambem podem bloquear o site no computador do usuario.
Dependendo das regras de privacidade os cookies nao funcionaram.
exemplos: esse forum mesmo usa sessao.
hoje em dia o cookie deve ser usado para coisas alternativas como exemplo: salvar se o cara excolheu sim ou nao coisas nao importantes em resumo
#679937 Cookie....
Posted by prix on 27/12/2005, 12:51 in CGI/Perl
use CGI::Session qw/-ip-match/;
$path_sessoes = '/home/seusite/cgi-bin/sessoes'; # local onde as sessoes sao armazenadas
$session = new CGI::Session("driver:File",undef,{'Directory'=>"$path_sessoes"});
$session->param('teste _tmg',"$login");
$session->param('_IDLE_EXPIRY' => time + 1800);
$session->expire('+1d');
$sid = $session->id();
print "Location: [url="http://www.seusite.com/index.cgi?sid=$sid\n\n";"]http://www.seusite.com/index.cgi?sid=$...n\n";[/url]
$sid eh o id da sessao q deve ser levado como no exemplo de redireção o location para que vocÊ nao precise de cookie.
para ler
$form = new CGI;
$sid = $form->param('sid');
unless ($sid ne '') {
print "Content-Type: text/html\n\n";
print('Atenção: Sua sessão não eh reconhecida.');
exit;
}
CGI::Session->name($scookie);
$session = new CGI::Session("driver:File",$sid,{'Directory'=>"$path_sessoes"}) or die "$!";
$login = $session->param('teste _tmg');
#663734 Cgi/perl E Html Para Xml
Posted by prix on 22/11/2005, 19:34 in CGI/Perl
coloque essa parte do codigo em uma sub-rotina.
sub esse_codigo {
seu codigo entra aqui
}
como você tem um chamado
$_ = @_[0];
basta chamar o codigo assim
&esse_codigo($informacao);
que o @_[0] iria pergar essa informações
dai para fazer um loop vc poderia
for ($i=0; $i > 100; $i++) {
&esse_codigo($informacao);
}
eh uma ideia, mas tente explicar melhor em como você quer q o loop funcione pois pelo o que voce disse nao consegui pegar a logica.
#663733 Trocar Caracteres Por Outros Variavel
Posted by prix on 22/11/2005, 19:31 in CGI/Perl
$variavel =~ s/\./%20/g; # substitui ponto por %20
$variavel =~ s/ /%20/g; # substitui espaço por %20
acho q dai você já pode formar o que deseja neh ?
vc pode tambem utilizar [a-d] por exemplo
para você tirar as consoantes voce tambem por fazer assim
$variavel =~ s/ga|go|gu|g/%20/g;
um exemplo com a G a | significa que se encontrar g ou ga ou go ou gu ele remove por %20
o G deve vir no final senao ele remove o g no inicio e nao remove o uqe da sentido ao mesmo.
#662362 Cgi/perl E Html Para Xml
Posted by prix on 18/11/2005, 13:29 in CGI/Perl
qual a finalidade ?
não é muito aconselhavel misturar programações nao... se vc quer adicionar o xml por causa do ajax, nao eh necessario usar xml para usar ajax, ele funciona perfeitamente cgi+ajax e o javascript eh uma linguagem solta onde tendo html vc pode adicionar o javascript entao não creio q ele venha muito ao caso ...
tende passar mais informações sobre o que você quer fazer.
exemplo:
por que quer xml no site ?
quais os recursos principais que você vai ter ?
quais os meios ou recursos que você utiliza que consomem mais recursos do servidor...
tente passar por partes aqui o que vc tem o que quer melhor o que quer ganhar desempenho para vermos o que podemos aconselhar ... a mudar ou nao... ou melhorar
- Fórum WMO
- → prix's Content
- Privacy Policy
- Regras ·