Variaveis Escalares, Operações ...
Started By prix, 10/11/2003, 16:54
8 replies to this topic
#1
Posted 10/11/2003, 16:54
Variáveis escalares
--------------------------------------------------------------------------------
As variáveis mais usadas em Perl são do tipo escalar. Esse tipo de variável pode armazenar strings ou números, a qualquer momento. As variáveis não precisam ser explicitamente declaradas, e são criadas à medida em que são definidas.
Toda referência a uma variável escalar inicia com o símbolo "$". Vejamos alguns exemplos. A instrução:
$nivel = 9;
seta a variável $nivel para o valor numérico 9. Da mesma forma, uma instrução posterior pode setar essa variável para um valor não numérico:
$nivel = 'alto';
Geralmente os nomes de variáveis consistem de letras, números e outros símbolos. Maiúsculas e minúsculas são diferenciadas; assim, $a e $A são duas variáveis distintas.
Operações e atribuições
--------------------------------------------------------------------------------
Em Perl podem ser usados os operadores aritméticos habituais de C:
$a = 1 + 2; # Soma 1 e 2 e deposita o valor em $a
$a = 3 - 4; # Subtrai 4 de 3 e deposita em $a
$a = 5 * 6; # Multiplica 5 e 6
$a = 7 / 8; # Divide 7 por 8
$a = 9 ** 10; # Nove elevado à décima potência
$a = 5 % 2; # Resto da divisão de 5 por 2
++$a; # Incrementa $a e retorna seu valor
$a++; # Retorna $a e a seguir a incrementa
--$a; # Decrementa $a e retorna seu valor
$a--; # Retorna $a e a seguir a decrementa
Para strings, Perl reserva os seguintes operadores:
$a = $b . $c; # Concatena $b e $c
$a = $b x $c; # $b repetido $c vezes
Para atribuições de valores, as seguintes formas podem ser usadas:
$a = $b; # Atribui $b a $a
$a += $b; # Soma $b a $a
$a -= $b; # Subtrai $b de $a
$a .= $b; # Concatena $b ao final de $a
Note que, quando Perl atribui um valor através de $a = $b, é feita uma cópia de $b e só então essa cópia é atribuida a $a. Dessa forma, na próxima vez que $b for modificado, isso não irá alterar $a.
Outras operações podem ser encontradas na página de manual Unix perlop.
Interpolação
--------------------------------------------------------------------------------
O código seguinte imprime a frase "peras e uvas" através do operador de concatenação de strings ".":
$a = 'peras';
$b = 'uvas';
print $a.' e '.$b;
Seria mais elegante colocar somente uma string no comando print, mas a a linha
print '$a e $b';
imprime literalmente a frase "$a e $b", o que não é o desejado. Ao invés de aspas simples ('), devem ser usadas aspas duplas (") para tal. A linha a seguir irá produzir o resultado desejado:
print "$a e $b";
As aspas duplas forçam a interpolação dos elementos presentes na string literal, incluindo variáveis e caracteres especiais, como \n (nova linha) e \t (tabulação).
Tutorial escrito por Henrique F. Silveira.
--------------------------------------------------------------------------------
As variáveis mais usadas em Perl são do tipo escalar. Esse tipo de variável pode armazenar strings ou números, a qualquer momento. As variáveis não precisam ser explicitamente declaradas, e são criadas à medida em que são definidas.
Toda referência a uma variável escalar inicia com o símbolo "$". Vejamos alguns exemplos. A instrução:
$nivel = 9;
seta a variável $nivel para o valor numérico 9. Da mesma forma, uma instrução posterior pode setar essa variável para um valor não numérico:
$nivel = 'alto';
Geralmente os nomes de variáveis consistem de letras, números e outros símbolos. Maiúsculas e minúsculas são diferenciadas; assim, $a e $A são duas variáveis distintas.
Operações e atribuições
--------------------------------------------------------------------------------
Em Perl podem ser usados os operadores aritméticos habituais de C:
$a = 1 + 2; # Soma 1 e 2 e deposita o valor em $a
$a = 3 - 4; # Subtrai 4 de 3 e deposita em $a
$a = 5 * 6; # Multiplica 5 e 6
$a = 7 / 8; # Divide 7 por 8
$a = 9 ** 10; # Nove elevado à décima potência
$a = 5 % 2; # Resto da divisão de 5 por 2
++$a; # Incrementa $a e retorna seu valor
$a++; # Retorna $a e a seguir a incrementa
--$a; # Decrementa $a e retorna seu valor
$a--; # Retorna $a e a seguir a decrementa
Para strings, Perl reserva os seguintes operadores:
$a = $b . $c; # Concatena $b e $c
$a = $b x $c; # $b repetido $c vezes
Para atribuições de valores, as seguintes formas podem ser usadas:
$a = $b; # Atribui $b a $a
$a += $b; # Soma $b a $a
$a -= $b; # Subtrai $b de $a
$a .= $b; # Concatena $b ao final de $a
Note que, quando Perl atribui um valor através de $a = $b, é feita uma cópia de $b e só então essa cópia é atribuida a $a. Dessa forma, na próxima vez que $b for modificado, isso não irá alterar $a.
Outras operações podem ser encontradas na página de manual Unix perlop.
Interpolação
--------------------------------------------------------------------------------
O código seguinte imprime a frase "peras e uvas" através do operador de concatenação de strings ".":
$a = 'peras';
$b = 'uvas';
print $a.' e '.$b;
Seria mais elegante colocar somente uma string no comando print, mas a a linha
print '$a e $b';
imprime literalmente a frase "$a e $b", o que não é o desejado. Ao invés de aspas simples ('), devem ser usadas aspas duplas (") para tal. A linha a seguir irá produzir o resultado desejado:
print "$a e $b";
As aspas duplas forçam a interpolação dos elementos presentes na string literal, incluindo variáveis e caracteres especiais, como \n (nova linha) e \t (tabulação).
Tutorial escrito por Henrique F. Silveira.
print join'',(reverse map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;
E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.
#2
Posted 16/09/2017, 07:11
Dutasteride No Doctor online pharmacy Amoxicillin And Clavulanate And Leprosy
Libido411
Buy now isotretinoin cialis Cialis Rembourse Par La Mutuelle
Libido411
Buy now isotretinoin cialis Cialis Rembourse Par La Mutuelle
#5
Posted 28/10/2017, 13:47
Google. Viagra India Cheap On Line Bentyl Website Discount Fedex With Free Shipping cialis Kamagra 100mg Oral Jelly Side Effects Comprar Cialis Original Online Madrid
Acheter Cialis 20 Mg Cheap Vardenafil 20mg buy viagra online Amoxil Dosage For Cats Buy Priligy Canada Cialis Cachets
Viagra Canada Drugs Blue Mountain Canadian Pharmacy viagra online pharmacy Zithromax Aman Untuk Ibu Hamil Levitra 20 Mg Bayer Viagra A 20 Anni Yahoo
Acheter Cialis 20 Mg Cheap Vardenafil 20mg buy viagra online Amoxil Dosage For Cats Buy Priligy Canada Cialis Cachets
Viagra Canada Drugs Blue Mountain Canadian Pharmacy viagra online pharmacy Zithromax Aman Untuk Ibu Hamil Levitra 20 Mg Bayer Viagra A 20 Anni Yahoo
#6
Posted 13/11/2017, 21:06
Viagra Prix Conseille Prevacid Buy One Get One Free Get Direct Progesterone Trophigil Online Price viagra Discount Elocon C.O.D. Can I Purchase With Free Shipping
Cialis Kaufen Bewertung Prix Levitra Belgique Amoxil 49 Ml Water viagra Canadian Pharmacy Prednizone Diabete E Cialis Viagra Ebay
Cialis Kaufen Bewertung Prix Levitra Belgique Amoxil 49 Ml Water viagra Canadian Pharmacy Prednizone Diabete E Cialis Viagra Ebay
#8
Posted 28/11/2022, 03:30
Biovail sued Andrx for infringement, which eventually resulted in a decision by the United States Court of Appeals for the Federal Circuit determining that Andrx s generic version did not infringe the 791 patent order priligy
#9
Posted 10/02/2023, 14:25
For over 35 years, our goal has always been to provide quality care to everyone in the community tamoxifen and vitamins to avoid
stromectol dosage for humans Further limitations pertained to data availability and uncertainty in underlying assumptions
Identification of severe myocardial failure aids choice of the most appropriate chronic antiarrhythmic drug, since dogs with severe dilated cardiomyopathy cannot tolerate beta blockade buy priligy on the internet without a prescription
propecia vs generic finasteride Adverse reactions to short acting nifedipine in hypertensive crises
Alexis, USA 2022 04 29 18 48 08 can you buy priligy over the counter This explains the growth arrest but not how it is able to slow down growth plate maturity
stromectol dosage for humans Further limitations pertained to data availability and uncertainty in underlying assumptions
Identification of severe myocardial failure aids choice of the most appropriate chronic antiarrhythmic drug, since dogs with severe dilated cardiomyopathy cannot tolerate beta blockade buy priligy on the internet without a prescription
propecia vs generic finasteride Adverse reactions to short acting nifedipine in hypertensive crises
Alexis, USA 2022 04 29 18 48 08 can you buy priligy over the counter This explains the growth arrest but not how it is able to slow down growth plate maturity
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)