Función escalar de Perl

Descripción

Esta función obliga a que la evaluación de EXPR se realice en un contexto escalar, incluso si normalmente funcionaría en un contexto de lista.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

scalar EXPR

Valor devuelto

Esta función devuelve Scalar.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl -w

@a = (1,2,3,4);
@b = (10,20,30,40);

@c = ( @a, @b );
print "1 - Final Array is @c\n";

@c = ( scalar(@a), scalar(@b) );
print "2 - Final Array is @c\n";

Cuando se ejecuta el código anterior, produce el siguiente resultado:

1 - Final Array is 1 2 3 4 10 20 30 40
2 - Final Array is 4 4