Du solltest "use strict" und "use warnings" nutzen. Dann wäre dir der Fehler wahrscheinlich selber aufgefallen.

In Zeile 28 steht folgendes:

Du hast $desc aber nirgendswo vorher definiert! Daher wird es bei einer Abfrage mit length als leerer String angesehen mit der länge 0. 0 ist nicht größer 0, daher wird der if block nie ausgeführt, und deine Funktion nie aufgerufen.