Perl

ref

ref EXPR



引数がリファレンスならリファレンスが参照する型を返します。それ以外は空文字を返します。組み込みの型には、次のものがあります。

  • REF
  • SCALAR
  • ARRAY
  • HASH
  • CODE
  • GLOB

参照元オブジェクトがパッケージにblessされたものであれば、代わりにパッケージ名を返します。

refの使い方

if ( ref($r) eq "HASH" ) {
	print "$r はハッシュのリファレンスです。\n";
}

関連記事