Perl 配列　チェック

Perlで配列かどうか調べる必要があったので、メモif( ref($arr) eq 'ARRAY' ){print ”配列です";}else{print ”配列ではありません。”;}意外と単純でした。