use subs "localtime"; sub localtime { @_ ? gmtime($_[0]) : gmtime() };
+ print localtime()."\n";
[download]

Prints UTC time instead of localtime. No need to mess with timezones.

(Or convince that module you're using to mock the time to override localtime with a fixed gmtime instead.)