Help for this page
print TIMES "$time." . '-' x 63 . "\n\n";'
$ perl -le 'print tr/-// for "$time.---------------------------------- +-----------------------------\n\n"'