Re: Perl - Debian- Programacao text-menu

[Wagner Klein da Silva <wks@niktu.psi.com.br>]

On Wed, 20 Jun 2001, Denf wrote:

>       Bom galera primeiramente orbigado a todos, que ajudaram ae nas
> dicas, mas olhem so usei a funcao system("ls opa.txt"); isso dentro
> do script perl. Esse aqruivo opa.txt nao existe, entao como obvio
> ele retornou arquivo inexistente.

Para esse tipo de função, o Perl possui testes equivalentes ao "test"
da linha de comando:


      if (-f "opa.txt") {
	 print "Existe e é um arquivo regular\n";
      }
      else {
         print "Erro: $!\n";
      }


>      Ae testei a variavel de ambiente $? na bash echo $? , como o
> arquivo nao existia era pra retornar o valor 1 mas isso nao ocorre,
> por que isso acontece ?

O retorno do comando vem com o retorno da função:

     $ret = system ("bla");


> Estranho porque nao shell funciona perfeitamente ja com a funcao
> system nao funcionou.


Apesar das semelhanças, Perl não é shell!  :)


Leia a documentação sobre as funções do perl com "man perlfunc".  Tem
_muitas_ páginas de manual do perl, veja a lista com "man perl".

Se você realmente quer aprender Perl, o "Camel Book" é indispensával.


--- Wagner                      wks@niktu.psi.com.br