#!/usr/bin/perl -w

use strict;

my @lt = localtime;

# @lt = ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)
print "@lt\n";

print "The current time is ", scalar localtime, "\n";

print scalar localtime 2**31-1, "\n";
print scalar localtime 2**31, "\n";