Что делать с «Argument is not numeric» в Gtk3 Perl?

Здравствуйте!
Суть такова: играюсь с Gtk3 Perl, установил, написао следующую прогу:
1
2
Но при запуске вылезает такая ошибка:
Argument "" isn't numeric in numeric gt (>) at Astronomy.pm line 10 (#1)
(W numeric) The indicated string was fed as an argument to an operator
that expected a numeric value instead. If you're fortunate the message
will identify which operator was so unfortunate.

Argument "" isn't numeric in subtraction (-) at Astronomy.pm line 14 (#1)
Argument "" isn't numeric in division (/) at Astronomy.pm line 17 (#1)
Она даже не гуглится!
А при нажатии на конпку "Calculate" появляется эта ошибка:
*** unhandled exception in callback:
*** Not a CODE reference at /usr/share/perl5/Gtk3.pm line 318.
*** ignoring at /usr/share/perl5/Gtk3.pm line 318.
Программа запускается, но вычислить то, что мне нужно не может. В Label какое-то число, но при нажатии на кнопку оно не меняется.
Попытался $text_jd->set_label("Julian day is: $jd"); заменить на print("$jd"); - вышла та же ошибка, про "unhandled exception..."
Заранее благодарю всех откликнувшихся!