Как узнать тип переменной в perl?

@eudora 

В Perl есть несколько способов узнать тип переменной.

1. С помощью оператора ref. Он возвращает тип ссылки, хранящейся в переменной. Например:

1
2
3
4
5
6
7
8
9

my $num = 42;
my $str = "hello";
my $arr_ref = [1, 2, 3];
my $hash_ref = {a => 1, b => 2};

print ref($num);   # "" (пустая строка)
print ref($str);   # ""
print ref($arr_ref);   # "ARRAY"
print ref($hash_ref);  # "HASH"

1. С помощью функции ref(). Она возвращает тип ссылки, хранящейся в переменной, или undef, если переменная не является ссылкой. Например:

1
2
3
4
5
6
7
8
9

my $num = 42;
my $str = "hello";
my $arr_ref = [1, 2, 3];
my $hash_ref = {a => 1, b => 2};

print ref($num);   # undef
print ref($str);   # undef
print ref($arr_ref);   # ARRAY
print ref($hash_ref);  # HASH

1. С помощью функций Scalar::Util::reftype() и Scalar::Util::blessed(). Функция reftype() возвращает тип ссылки, хранящейся в переменной, или undef, если переменная не является ссылкой. Функция blessed() возвращает имя класса, к которому относится объект, хранящийся в пер