Check your error logs!! That's the best place for help.
Did you declare $TIME_START as a global variable? You would need to define it at the start of the program, external to any block, since you are allowing two routines that are external to any block to use it.
Also, you have this:
BEGIN { local $@; eval { require Time::HiRes; import Time::HiRes qw/time/; }; }
In sub _time_start , but you have it scoped as a run-time 'require', which would most likely not make it available to:
my $end = time;
in sub _time_display
Just some thoughts. Check your error log. It will most likely tell you.
PUGDOGŪ
PUGDOGŪ Enterprises, Inc.
FAQ: http://pugdog.com/FAQ
Did you declare $TIME_START as a global variable? You would need to define it at the start of the program, external to any block, since you are allowing two routines that are external to any block to use it.
Also, you have this:
BEGIN { local $@; eval { require Time::HiRes; import Time::HiRes qw/time/; }; }
In sub _time_start , but you have it scoped as a run-time 'require', which would most likely not make it available to:
my $end = time;
in sub _time_display
Just some thoughts. Check your error log. It will most likely tell you.
PUGDOGŪ
PUGDOGŪ Enterprises, Inc.
FAQ: http://pugdog.com/FAQ
