Perl minha função

Descrição

Esta função declara que as variáveis ​​em LIST têm escopo léxico dentro do bloco envolvente. Se mais de uma variável for especificada, todas as variáveis ​​devem ser colocadas entre parênteses.

Sintaxe

A seguir está a sintaxe simples para esta função -

my LIST

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

my $string = "We are the world";
print "$string\n";
myfunction();
print "$string\n";

sub myfunction {
   my $string = "We are the function";
   print "$string\n";
   mysub();
}
sub mysub {
   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 world
We are the world