#!/usr/bin/perl
use strict;
use Date::Manip;
print &UnixDate(&ParseDate("epoch ".time()),"%Y-%m-%d %H:%M:%S")."\n";