Use of uninitialized value in subtraction (-) at (eval 1) line 2.
        main::__ANON__() called at pm564376.pl line 14
        main::run() called at pm564376.pl line 8