no¹, but -l will point you to the original source line

-l

    Add '#line' declarations to the output based on the line and file 
+locations of the original code.
[download]

for instance

perl -MO=Deparse,-l tst_glob.pl
#line 1 "tst_glob.pl"
$\ = "\n";
#line 3 "tst_glob.pl"
$n = 123;
#line 5 "tst_glob.pl"
$gr = \*n;

...
[download]

so just write yourself a post processor script to reinclude the missing lines as comments or POD or here-docs or whatever.

I recommend using Perl, it's good at text processing. ;-)

¹) IIRC does B::Concise have an option to include original code... (update: yes -src )