Both were created back in 2003 and I was wondering if there is now a more concise solution to this.

Since 2003 there has been only one major release of Perl, and none of the new features would make mimicing grep -A1 -B1 any simpler than it already is.