in reply to grep -A10 oneliner?

FWIW, my entry:
perl -wne'print if /pattern/..(/pattern/&&($.=-10),$.>=0)'