Data por extenso
Publicado por Carcarah do Sertão Agreste 07/07/2004
[ Hits: 6.183 ]
Imprime a data no formato <Dia da Semana>, <Dia> de <Mes> de <Ano>. Ótimo para websites.
Para iniciantes.
#!/usr/bin/perl ### Autor: Carcarah ### Email: thenazgul@terra.com.br ### NÃO MODIFIQUEM O NOME DO AUTOR print &data(); exit(); sub data { local(@dias,@meses,$seg,$min,$hora,$mdia,$mes,$ano,$sdia,$adia,$dst,$strmes); @dias = ( 'Domingo','Segunda','Terça','Quarta', 'Quinta','Sexta','Sábado' ); @meses = ( 'Janeiro','Fevereiro','Março','Abril', 'Maio','Junho','Julho','Agosto','Setembro', 'Outubro','Novembro','Dezembro' ); ($seg,$min,$hora,$mdia,$mes,$ano,$sdia,$adia,$dst) = localtime(time); $ano += 1900; if ($mdia < 10) {$mdia = "0$mdia";} if ($mes < 10) {$mes = "0$mes";} $strmes = ++$mes; $dta = "$mdia/$strmes/$ano"; $mes_atual = "$strmes/$ano"; if ($hora < 10) {$hora = "0$hora";} if ($min < 10) {$min = "0$min";} if ($seg < 10) {$seg = "0$seg";} $resp = "@dias[$sdia], $mdia de @meses[$mes-1] de $ano"; }
Cálculo de área de uma figura geométrica
Calcula equação de segundo grau completa
Nenhum coment�rio foi encontrado.
Aprenda a Gerenciar Permissões de Arquivos no Linux
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Como instalar o Google Cloud CLI no Ubuntu/Debian
Mantenha seu Sistema Leve e Rápido com a Limpeza do APT!
Procurando vídeos de YouTube pelo terminal e assistindo via mpv (2025)
Sinto uma leve lentidão ao arrastar, miniminizar e restauras as janela... (0)
Zorin OS - Virtual Box não consigo abrir maquinas virtuais (6)