$ perl -le'substr(my $now = localtime, 11, 9, ""); print $now'
Thu Dec 17 2009