$yr = `date -u +%Y`;
chomp $yr;