in reply to grep -A10 oneliner?

I think this is fully golfed, yet reasonably readable: 
perl -ne 'print if/pattern/?$c=10:$c-->0'

[download]
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom