in reply to sprintf the last 2 digits
Try
my $year = 2002; $year =substr($year, -2); print $year; [download]