Función de referencia de Perl

Descripción

Esta función devuelve un valor verdadero si EXPR, o $ _ si no se proporciona EXPR, es una referencia. El valor real devuelto también define el tipo de entidad a la que se refiere la referencia.

Los tipos incorporados son:

• REF
• SCALAR
• ARRAY
• HASH
• CODE
• GLOB
• LVALUE
• IO::Handle

Si una variable fue bendecida con la función bless (), se devolverá el nuevo tipo de datos. El nuevo tipo de datos normalmente será un nombre de clase.

Sintaxis

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

ref EXPR

ref

Valor devuelto

Esta función devuelve una cadena vacía si no es una referencia y una cadena si es una referencia en el contexto escalar.

Ejemplo

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

#!/usr/bin/perl -w

$foobar = { };
bless($foobar, 'ATMPCLASS');
print "ref() \$foobar is now in class ", ref($foobar), "\n";

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

ref() $foobar is now in class ATMPCLASS