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