@eudora
В Perl есть несколько способов узнать тип переменной.
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 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 |