programming-examples/perl/Datatype/Set the value of localtime to a scalar variable, you'll get a typical UNIX-style time.pl

#!/usr/bin/perl -w

$t = time();

$now = localtime($t);

print "Time is: $now\n";