Usenet 1994 October/usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso/misc/volume5/ctime.pl/ctest

Text File | 1989-02-03 | 188b | 11 lines

eval "exec perl -PS $0 $*"
    if $running_under_some_shell;
;# Simple Test of ctime.pl  Waldemar Kebsch
;#

#include <importenv.pl>
#include <ctime.pl>

$Date = do ctime(time);
print $Date;