Simple GUI Perl countdown/timer app