# Perl, 37 bytes <!-- language-all: lang-perl --> sleep print/(\S{8})/,$/while$_=gmtime In a scalar context, `gmtime` will return a string similar to `Sat Nov 28 10:23:05 2015`. The time is extracted (the only stretch of 8 non-whitespace characters), and the result from `print`, always 1, is used as the parameter for `sleep`.