Skip to main content
Code Golf

Return to Answer

deleted 327 characters in body
Source Link
Dada
Dada
  • 8.5k
  • 1
  • 17
  • 43

Perl, 4333 bytes

$@.=say+(gmtime)[5]-$_+1900 .$"for$_+1900for 0..120;say$@120

Run with -M5.010 or -E :

perl -E '$@.=(gmtime)[5]-$_+1900 .$"for 0..120;say$@'

*Note*: I was hoping for something shorter... Here are 2 other versions (same byte count, and 1 byte longer), maybe you, reader, will be inspired by them to find a shorter one : 
perl -E 'push@c,'say+(gmtime)[5]-$_+1900for 0..120;say"@c"'
perl -E '@c=eval"(gmtime)[5]+1900-\$_++,"x121;say"@c"'120'

Perl, 43 bytes

$@.=(gmtime)[5]-$_+1900 .$"for 0..120;say$@

Run with -M5.010 or -E :

perl -E '$@.=(gmtime)[5]-$_+1900 .$"for 0..120;say$@'

*Note*: I was hoping for something shorter... Here are 2 other versions (same byte count, and 1 byte longer), maybe you, reader, will be inspired by them to find a shorter one : 
perl -E 'push@c,(gmtime)[5]-$_+1900for 0..120;say"@c"'
perl -E '@c=eval"(gmtime)[5]+1900-\$_++,"x121;say"@c"'

Perl, 33 bytes

say+(gmtime)[5]-$_+1900for 0..120

Run with -M5.010 or -E :

perl -E 'say+(gmtime)[5]-$_+1900for 0..120'
Source Link
Dada
Dada
  • 8.5k
  • 1
  • 17
  • 43

Perl, 43 bytes

$@.=(gmtime)[5]-$_+1900 .$"for 0..120;say$@

Run with -M5.010 or -E :

perl -E '$@.=(gmtime)[5]-$_+1900 .$"for 0..120;say$@'

*Note*: I was hoping for something shorter... Here are 2 other versions (same byte count, and 1 byte longer), maybe you, reader, will be inspired by them to find a shorter one : 
perl -E 'push@c,(gmtime)[5]-$_+1900for 0..120;say"@c"'
perl -E '@c=eval"(gmtime)[5]+1900-\$_++,"x121;say"@c"'