Blog do Plastico

Os usuários do Sistema do Pinguim para Desktop já podem testar a primeira versão disponível do Navegador do Google sem precisar recorrer a nenhum tipo de gambiarra.

Num curto período de tempo em que usei Windows no trabalho eu adotei o Chrome como navegador principal, por ser mais rápido do que o Internet Explorer e até mais rápido do que o Firefox, claro que neste último com muito menos funcionalidades, mas neste caso como eu precisava mais de agilidade o Chrome foi perfeito, assim que cheguei ao trabalho executei a instalação do Navegador, veja abaixo imagens de um passo-a-passo de instalação, foi tão dolorida que deu até medo.

…Leia mais sobre Saiu o Beta do Google Chrome para Linux

Olá, este é mais um post da série “Dicas de Programação do Titio Plastico” , hoje vou mostrar como você consegue criar sem muito esforço um script que receberá diversos parâmetros pela linha de comando que servirão de informações adicionais para um script se tornar mais dinâmico. O que é algo muito útil para Administradores de Sistema e programadores que querem agilizar ao máximo seu trabalho.

Abaixo vai o código comentado, no exemplo serão passados Nome, email e telefone de um usuário qualquer:

#!/usr/bin/perl

#[ Use estes dois aqui sempre, esta lah no livro de boas praticas ]
use warnings;
use strict;

#[Esta é a classe que deve ser chamada para gerenciar os parâmetros]
use Getopt::Std;

#[Criaremos aqui um array vazio que irá receber os parâmetros]
my %hash = ();

#[Aqui é onde o getopts associa o conteúdo de cada parâmetro ao array]
getopts(“:n:e:t:”, \%hash);

#[Mandando inprimir o resultado]
print ” Nome $hash{n} , email $hash{e} , telefone $hash{t}\n”;

Executando o script:

~$ ./parametros.pl -n Plastico -e plastico@hotmail.com -t 21212121
Nome Plastico , email plastico@hotmail.com , telefone 21212121

Depois que eu comprei meu MacBook, sobre o qual eu falarei por completo logo mais, eu consegui melhorar em muito a minha produtuvidade, e estou tocando alguns projetos pessoais e algumas mudanças que eu queria fazer aqui no blog, e a primeira delas é uma página com todas a Ferramentas que eu desenvolvo nas horas vagas. Estão lá o JsIndexer, o Moneylog.rb e mais algumas, e a lista vai crescer ainda mais, aguardem por mais novidades em breve.

Vida Longa e Próspera!

Depois de Anunciar na semana passada a liberação do código fonte do Chromium OS que é a versão de código aberto do Chrome OS, o sistema desenvolvido para Netbooks do Google, pipocaram na internet milhões de opções de download do novo sistema, eu aproveitei uma destas e resolvi testar em uma Máquina Virtual o que o sistema tem a oferecer, claro que muitas pessoas podem se contentar em ver isto apenas assistindo o vídeo abaixo, mas nerds querem mesmo botar a mão na massa, então mais abaixo tem um passo-a-passo de como instalar e sair usando o novo sistema do Gigante das Buscas pela internet.

…Leia mais sobre Instalando, usando e testando o Chromium OS no VirtualBox

Vou deixar aqui uma dica bem rápida de programação que é bastante simples mas de grande valor no que se refere a geração e manipulação de datas usando a linguagem Perl.

O Perl é uma linguagem já bem antiga mas ainda assim bastante poderosa e largamente difundida principalmente junto aos Administradores de Sistemas Unix Like por ajudar a automatizar diveras tarefas. Eu costumo usar esta linguagem no meu dia-a-dia, mas quanto mais eu uso, mais eu vejo que tenho muito a aprender.

Uma das coisas que mais me traz dificuldades é trabalhar com datas, não só em Perl, mas em qualquer linguagem esta tarefa é meio complicada. O problema é que Perl tem um jeito todo particular de tratar as datas, seus contadores internos começam sempre com 0 (zero), sendo assim, o mês de Janeiro é o mês Zero por exemplo, logo Dezembro é o mês 11!

Difícil de entender, fala a verdade…a parte boa é que o Perl trabalha muito bem com timestamp, que na minha opinião é a melhor maneira de trabalhar com datas em qualquer lugar.

Numa histórinha rápida o timestamp é um contador que controla a quantidade de segundos que se passaram desde as zero horas do dia Primeiro de Janeiro de 1970.

O timestamp é muito interessante porque nele não existem horas, dias semanas, meses, anos…só segundos, e a partir desta quantidade de segundos você consegue descobrir qualquer data e hora que se deseje.

Para fazer isto em Perl basta inserir no seu script as linhas como no exemplo abaixo:

#!/usr/bin/perl
use POSIX;
my $birthday = POSIX::strftime(“%d/%m/%Y”,localtime(time-1012025181));
print “$birthday\n”;

A mágica toda fica por conta do Modulo Posix que é importado no começo do script, que chama a função strftime que faz a conversão, e o timestamp que foi falado acima é gerado com a função time do perl e sem esforço nenhum você consegue obter qualquer data, no exemplo acima a data que será impressa é 09/10/1977 que é a data do meu nascimento, que eu consegui subtraindo o time pelo número de segundos 1012025181.

Ah, a data no formato dd/mm/yyyy foi conseguida com a inclusão do formato %d/%m/%Y igual no comando date do Linux ;^)

Bom, é isso, espero que os programadores de plantão tenha gostado da dica, um abraço!