How To Obtain The Current Year In Perl Easily

Author: erics, Posted June 29th, 2011 at 10:44:29am

This simple formula will give a Y2K-compliant 4-digit year with low overhead:

$year = (localtime)[5] + 1900;

1	$year = (localtime)[5] + 1900;

All fields marked with "*" are required.