/^(?:1950|1951|1952|1953|...|2049|2050)$/;

##</code><code>##

use Regex::PreSuf;
my $re = presuf(1950..2050);