Descrição
Esta função define as variáveis especificadas em LIST como sendo globais dentro do bloco, arquivo ou instrução eval envolvente. É efetivamente o oposto de my.it declara uma variável global dentro de todo o escopo, em vez de criar uma nova variável privada com o mesmo nome. Todas as outras opções são idênticas ao meu;
Uma nossa declaração declara uma variável global que será visível em todo o seu escopo léxico, mesmo através dos limites do pacote. O pacote no qual a variável é inserida é determinado no ponto da declaração, não no ponto de uso. Se mais de um valor for listado, a lista deve ser colocada entre parênteses.
Sintaxe
A seguir está a sintaxe simples para esta função -
our EXPR
our EXPR TYPE
our EXPR : ATTRS
our TYPE EXPR : ATTRS
Valor de retorno
Esta função não retorna nenhum valor.
Exemplo
A seguir está o código de exemplo que mostra seu uso básico -
#!/usr/bin/perl -w
our $string = "We are the world";
print "$string\n";
myfunction();
print "$string\n";
sub myfunction {
our $string = "We are the function";
print "$string\n";
}
Quando o código acima é executado, ele produz o seguinte resultado -
We are the world
We are the function
We are the function