Help for this page

Select Code to Download


  1. or download this
    my $nyear = (split '\s', localtime)[4]+1;
  2. or download this
    my $nyear = (localtime)[5] + 1;