Well I don't know what lsnrctl stat BLAH does but I'm guessing you're getting some lines of data back. I can't promise this'll work but give it a shot...

lsnrctl stat ZRRI_LISTENER | perl -e "print map{(split)[4].$/} grep /P
+arameter/, <STDIN>"
[download]

"Argument is futile - you will be ignorralated!"