Como Perl é uma linguagem muito prática e flexível, resolvi escrever esta dica para ficar como exemplo para iniciantes e como curiosidade para quem sempre busca soluções simples para problemas do dia a dia.

Código:


Explicação:

As linhas iniciadas com '#' são comentários, isso dispensa maiores detalhes.

Na segunda linha podemos observar duas funções (print e eval) e um descritor de arquivos (STDIN).

O descritor STDIN lê os dados enviados para o programa via entrada padrão do sistema (ex.: teclado).

A função "eval" tenta interpretar as informações que lhe foram enviadas pelo <STDIN> e retorna o valor da expressão.

A função "print" exibe o resultado da expressão processada pela função "eval" na saída padrão do sistema (ex.: monitor).

Exemplos:

perl /tmp/calc.pl
1+2

Imprime "3" na tela.

echo "2*4" >/tmp/calc.exp (criamos um arquivo com uma expressão)
perl /tmp/calc.pl </tmp/calc.exp (imprime na tela o resultado da expressão)