Originalmente concebido como uma linguagem de script Unix , Perl tornou-se uma linguagem de programação de propósito geral usado em várias capacidades. Ele ainda é usado como uma linguagem de script Unix e Linux por administradores de sistema . Um dos usos da língua pode ser para testar se existe um arquivo e quer imprimir a resposta para a tela ou agir sobre o resultado. FileHandle " -e" é utilizado para testar a existência de arquivo . Instruções
1
Abra um documento em branco em qualquer editor de texto.
2 Tipo
" # /usr /bin /perl- w" na primeira linha do documento para iniciar o script Perl.
3
Digite o "$ arquivo = ' arquivo.txt" linha para criar a variável que contém o nome do arquivo. Substituir " file.txt ", com o nome do arquivo que você deseja testar .
4
Digite a linha " if ( -e $ file ) { " para iniciar a instrução if que verifica a . arquivo
5
Digite a linha de "print" Sim, o arquivo existe ! ";} " para a saída da linha de " Sim, o arquivo existe ! " para a tela , se o arquivo existe.
6
Digite a linha "else {print" Não, o arquivo não existe. ";)" para imprimir a linha " Não, o arquivo não existe. " se o arquivo não existir
7
Digite a linha "exit ; " . . para fechar o script Perl
8
Salve o arquivo como " file_exist.pl " e feche o arquivo.
9
Digite " perl file_exist.pl " em um prompt de comando para executar o script.