$ perl -E 'my $y = 3; say "$_: ", /^(?:${\join "|", $y-1 .. $y+1})$/ ? "YES" : "NO" for 1..5'
1: NO
2: YES
3: YES
4: YES
5: NO