print +(localtime)[5] #### my $year = (localtime)[5]