Иногда нужно узнать на массив, хэш или скаляр указывает ссылка.
ref возвращает строковый идентификатор типа ссылки (SCALAR, ARRAY, HASH, CODE, REF, GLOB, LVALUE) 
или пустое значение для обычных переменных. Например:

   if (ref($r) eq "HASH") {
         print "Хэш\n";
   } elsif (ref($r) eq "ARRAY"){
         print "Массив\n";
   }