my $year = (localtime())[5]; print "The year is 19$year\n";