Escalar Perl

Um escalar é uma unidade simples de dados.

Um escalar pode ser um número inteiro, um número de ponto flutuante, um caractere, uma string, um parágrafo ou uma página da web completa.

O exemplo a seguir demonstra um uso simples de escalares:

Exemplo

#!/usr/bin/perl $idade = 20 ; # Atribuição de número inteiro $ nome = " Codercto " ; $salário = 130,50 ; # Número de ponto flutuante imprimir " Idade = $ idade n " ; " Nome = $ nome n " ; " Salário = $salário n " ;

Executando o programa acima, o resultado de saída é:

 Idade = 20Nome = CoderctoSalário = 130,5

escalar numérico

Um escalar geralmente é um número ou uma string. Os exemplos a seguir demonstram o uso de diferentes tipos de escalares numéricos:

Exemplo

#!/usr/bin/perl $ inteiro = 200 ; $ negativo = - 300 ; $ flutuante = 200,340 ;​​​​ $octal = 0377 ; #Hexadecimal FF, decimal é 255 $hexa = 0 xff imprimir ; " inteiro = $inteiro n " ; " negativo = $ negativo n " ; " flutuante = $ flutuante n " ; " grandefloat = $bigfloat n " ; " octal = $octal n " ; " hexa = $hexa n " ;

Executando o programa acima, o resultado de saída é:

 inteiro = 200negativo = -300flutuante = 200,34bigfloat = -1,2e-23octal = 255hexa = 255

escalar de cadeia

Os exemplos a seguir demonstram o uso de diferentes tipos de escalares de string. Preste atenção à diferença entre aspas simples e aspas duplas:

Exemplo

#!/usr/bin/perl $ var = " String escalar - tutorial do codificador ! " ; $ quote = ' Estou entre aspas simples - $ var ' ; t Olá, mundo! " ; imprimir " var = $var n " ; " citação = $ citação n " ; " duplo = $ duplo n " ; " escape= $escape n " ;

Executando o programa acima, o resultado de saída é:

 var = String escalar - Tutorial do programador! quote = Estou entre aspas simples - $vardouble = Estou entre aspas duplas - String escalar - Tutorial do programador escape = Use caracteres de escape - Olá, mundo!

Operações escalares

O exemplo a seguir demonstra operações simples em escalares:

Exemplo

#!/usr/bin/perl $str = " olá " . " mundo " ; # Concatenação de strings $num = 5 + 10 ; # Some dois números $mul = 4 * 5 ; # Multiplica dois números $mix = $str . $num ; # Concatena strings e números imprimir " str = $str n " ; " num = $num n " ; " mistura = $mistura n " ;

Executando o programa acima, o resultado de saída é:

 str = olámundonum = 15mix = olámundo15

string multilinha

Podemos usar aspas simples para gerar strings multilinhas da seguinte maneira:

Exemplo

#!/usr/bin/perl $string = ' Tutorial do Coder - Aprenda não só tecnologia, mas também sonhos! ' ; imprimir " $string n " ;

Executando o programa acima, o resultado de saída é:

 Tutorial para programadores - aprenda não só tecnologia, mas também sonhos!

Você também pode usar a sintaxe do documento "aqui" para gerar múltiplas linhas:

Exemplo

#!/usr/bin/perl print << EOF ;Tutorial para programadores - aprenda não apenas tecnologia, mas também sonhos! EOF

Executando o programa acima, o resultado de saída é:

 Tutorial para programadores - aprenda não só tecnologia, mas também sonhos!

caracteres especiais

A seguir demonstraremos a aplicação de caracteres especiais em Perl, como __FILE__, __LINE__ e __PACKAGE__, que representam respectivamente o nome do arquivo, o número da linha e o nome do pacote do script atualmente em execução.

Nota : __ tem dois sublinhados e há dois sublinhados antes e depois de __FILE__ .

Esses caracteres especiais são tokens separados e não podem ser escritos em uma string, por exemplo:

Exemplo

#!/usr/bin/perl imprimir " Nome do arquivo " __FILE__ .​​​​ " número da linha " __LINE__ .​​​​ " Nome do pacote " __PACKAGE__ .​​​​ imprimir " __FILE__ __LINE__ __PACKAGE__ n " ;

Executando o programa acima, o resultado de saída é:

 Nome do arquivo test.pl número da linha 4 nome do pacote main__FILE__ __LINE__ __PACKAGE__

corda

Uma string começando com v seguida por um ou mais números inteiros separados por pontos é tratada como uma string literal.

Quando você deseja declarar diretamente o valor numérico para cada caractere, v-string fornece uma maneira mais limpa de construir tais strings, ao contrário de "x{1}x{14}x{ 12c}x{fa0}" não é fácil de entender. Podemos observar os seguintes exemplos:

Exemplo

#!/usr/bin/perl $ smile = v9786 ; $ foo = v102.111.111 ; $ martin = v77.97.114.116.105.110 ;​​​​​" sorriso = $ sorriso n " ; " foo = $foo n " ; " martinho = $martinho n " ;

Executando o programa acima, o resultado de saída é:

 Caractere largo impresso em test.pl linha 7.smile = ☺foo = foomartin = Martin