Escalares y signos en Perl

Un signo $ para cada valor individual, ya guarde una cadena o un número.

use strict;
use warnings;

# one sigil, one value: strings and numbers share the scalar
my $name  = "perl";
my $year  = 1987;
my $ratio = 0.5;

my $port = "8080";
print "$name arrived in $year\n";
print $port + 1, " is one port up\n";
print "half of $year is ", $year * $ratio, "\n";

my $tag = $name . "-" . $year;
print "tag: $tag\n";

Cómo funciona

1. my declara un escalar léxico; use strict vuelve obligatoria la declaración.
2. Las cadenas entre comillas dobles interpolan $name y $year en su lugar.
3. + y * tratan la cadena numérica "8080" como número; . concatena.

Palabras clave y builtins usados aquí

• my
• print
• use

El intento, en números

Líneas

15

Caracteres a escribir

336

Tokens

68

Ritmo de tres estrellas

70 tpm

Al ritmo de tres estrellas de 70 tokens por minuto, este intento toma unos 58 segundos.

Escribe este fragmento

Paso 1 de 3 en Escalares y signos; paso 1 de 27 en Fundamentos del lenguaje.

Siguiente →