Algumas variáveis especiais são definidas na linguagem Perl, geralmente prefixadas com $, @ ou %, por exemplo: $_.
Muitas variáveis especiais têm um nome longo em inglês. A variável do sistema operacional $!
Se você quiser usar variáveis especiais com nomes em inglês, você precisa adicionar use English no início do programa. Isso permite o uso de variáveis especiais descritivas em inglês.
A variável especial mais comumente usada é $_, que contém entrada padrão e conteúdo de correspondência de padrões. Os exemplos são os seguintes:
Executando o programa acima, o resultado de saída é:
GoogleCoderctoTaobao
Nos exemplos a seguir não usamos $_ para gerar conteúdo:
Executando o programa acima, o resultado de saída é:
GoogleCoderctoTaobao
No exemplo, "Google" é gerado primeiro, depois "Codercto" e, finalmente, "Taobao".
Em um loop iterativo, a string do loop atual será colocada em $_ e depois impressa. Além disso, print não especifica uma variável de saída e $_ é usado por padrão.
Aqui estão alguns lugares onde Perl assumirá $_ mesmo que não seja especificado:
Várias funções unárias, incluindo funções como ord() e int() e todas as operações de teste de arquivo ("-f", "-d") exceto "-t", que opera em STDIN por padrão.
Várias funções de lista, como print() e unlink().
Operações de correspondência de padrões "m//", "s///" e "tr///" sem o operador "=~".
A variável de iteração padrão para "foreach" faz um loop quando nenhuma outra variável é fornecida.
Variáveis de iteração implícitas para funções grep() e map().
Quando "while" tem apenas uma condição e essa condição testa o resultado da operação "", $_ é o local padrão para o registro de entrada. Isto não acontece exceto em condições de teste "while". (Mnemônico: o sublinhado pode ser omitido em certas operações.)
De acordo com a natureza do uso das variáveis especiais, elas podem ser divididas nas seguintes categorias:
Variável especial escalar global.
Variáveis especiais de matriz global.
Variável especial de hash global.
Identificador de arquivo especial global.
Constantes especiais globais.
Variáveis especiais de expressão regular.
Variável especial de identificador de arquivo.
A seguir listamos todas as variáveis escalares especiais, incluindo variáveis com caracteres especiais e formas em inglês:
| $_ | Entrada padrão e conteúdo de correspondência de padrões. |
| $ARG | |
| $. | O número da linha atual da última leitura do identificador de arquivo |
| $NR | |
| $/ | Insira o separador de registro, cujo padrão é um caractere de nova linha. Se você usar a variável undef, o final do arquivo será lido. |
| $ RS | |
| $, | Separador de campo de saída |
| $OFS | |
| $ | Separador de registros de saída |
| $ORS | |
| $" | Esta variável é semelhante a $, mas deve ser usada para interpolar valores de array e fatiar em strings entre aspas duplas (ou strings interpoladas semelhantes). O padrão é um espaço. |
| $LIST_SEPARATOR | |
| $; | Delimitador usado ao simular matrizes multidimensionais. O padrão é " 34". |
| $SUBSCRIPT_SEPARATOR | |
| $^L | Alimentação de papel enviada para o canal de saída. O padrão é "f". |
| $FORMAT_FORMFEED | |
| $: | O conjunto atual de caracteres após o qual uma string pode ser quebrada para preencher campos de continuação (começando com ^) em um formato padrão é "n"". |
| $FORMAT_LINE_BREAK_CHARACTERS | |
| $^A | Variável para armazenar dados formatados antes de imprimir |
| $ ACUMULADOR | |
| $# | Formato de saída de número padrão ao imprimir números (obsoleto). |
| $OFMT | |
| $? | Retorna o status do comando externo anterior |
| $CHILD_ERROR | |
| $! | O valor numérico desta variável é o valor de errno, e o valor da string é a string de erro do sistema correspondente. |
| $OS_ERROR ou $ERRNO | |
| $@ | A mensagem de erro do comando eval Se estiver vazio, significa que o último comando eval foi executado com sucesso. |
| $EVAL_ERROR | |
| $$ | O número do processo que executa o script Perl atual |
| $PROCESS_ID ou $PID | |
| $< | O número real do usuário do processo atual |
| $REAL_USER_ID ou $UID | |
| $> | O ID de usuário efetivo do processo atual |
| $EFFECTIVE_USER_ID ou $EUID | |
| $( | O número real do usuário do grupo do processo atual |
| $REAL_GROUP_ID ou $GID | |
| $) | O número efetivo de usuários do grupo do processo atual |
| $EFFECTIVE_GROUP_ID ou $EGID | |
| US$ 0 | Contém o nome do arquivo do script que está sendo executado |
| $PROGRAM_NAME | |
| $[ | O subscrito do primeiro elemento da matriz, o padrão é 0. |
| $] | Número da versão Perl |
| $PERL_VERSION | |
| $^D | valor do sinalizador de depuração |
| $ DEPURAÇÃO | |
| $^E | Mensagens de erro estendidas do sistema operacional em ambientes não UNIX |
| $EXTENDED_OS_ERROR | |
| $^F | Valor máximo do descritor de pacote de arquivos |
| $SYSTEM_FD_MAX | |
| $^H | Status de verificação de sintaxe ativado pelo compilador |
| $^eu | Valores do editor de controle integrado |
| $INPLACE_EDIT | |
| $^ milhões | Tamanho do pool de memória sobressalente |
| $^O | nome do sistema operacional |
| $OSNAME | |
| $^P | Variável interna que especifica o valor de depuração atual |
| $PERLDB | |
| $^T | O tempo em segundos em que o script começou a ser executado, a partir do início do novo século. |
| $BASETIME | |
| $^W | Valor atual do interruptor de aviso |
| $AVISO | |
| $^X | O nome do código executável binário Perl |
| $EXECUTABLE_NAME | |
| $ARGV | O nome do arquivo atual ao ler o identificador de arquivo padrão |
| @ARGV | Lista de argumentos de linha de comando passados para o script |
| @INC | Lista de diretórios para pesquisar ao importar um módulo |
| @F | Entrada de array da linha de comando |
%INC | A tabela hash %INC contém todos os arquivos incluídos nas instruções do ou require. A chave é o nome do arquivo e o valor é o caminho para o arquivo. |
%ENV | Contém variáveis de ambiente atuais |
%SIG | Lista de sinais e como lidar com eles |
ARGV | Identificadores de arquivo especiais que iteram por todos os nomes de arquivo na variável de matriz @ARGV |
STDERR | Identificador de saída de erro padrão |
STDIN | identificador de entrada padrão |
STDOUT | identificador de saída padrão |
DADOS | O identificador de arquivo especial refere-se a qualquer coisa no arquivo após o sinalizador __END__, incluindo o conteúdo do script. Ou faça referência a tudo após o sinalizador __DATA__ em um arquivo de inclusão. Contanto que você leia os dados no mesmo pacote, __DATA__ existirá. |
_ (sublinhado) | Identificadores de arquivo especiais são usados para armazenar informações do arquivo em cache (fstat, stat e lstat). |
__FIM__ | A lógica do script termina e o texto subsequente é ignorado. |
__ARQUIVO__ | nome do arquivo atual |
__LINHA__ | Número da linha atual |
__PACOTE__ | O nome do pacote atual O nome do pacote padrão é main. |
$ n | Contém a enésima substring da última correspondência de padrão |
$& | A string da correspondência de padrão anterior bem-sucedida |
$MATCH | |
$` | O conteúdo antes da última substring correspondida com sucesso |
$PRÉ-JOGO | |
$' | O conteúdo após a substring anterior correspondida com sucesso |
$POSTMATCH | |
$+ | O último colchete que corresponde ao padrão de pesquisa de expressão regular anterior. Por exemplo: /Versão: (.*)|Revisão: (.*)/ && ($rev = $+); |
$LAST_PAREN_MATCH |
$| | Se definido como zero, após cada chamada para a função write ou print, a função fflush é chamada automaticamente para gravar o conteúdo gravado de volta no arquivo. |
$OUTPUT_AUTOFLUSH | |
$% | Número da página de saída atual |
$FORMAT_PAGE_NUMBER | |
$= | O comprimento atual de cada página. O padrão é 60. |
$FORMAT_LINES_PER_PAGE | |
$- | O número de linhas restantes na página atual |
$FORMAT_LINES_LEFT | |
$~ | O nome do formato de saída do relatório atual. O valor padrão é o nome do identificador do arquivo. |
$FORMAT_NAME | |
$^ | O nome do formato de cabeçalho de saída do relatório atual. O valor padrão é o nome do identificador de arquivo com o sufixo "_TOP". |
$FORMAT_TOP_NAME |