perl -le "eval q!print $^O! for 1..10; eval qq!#line 99 foo.cfg\ndie!;print $@"

##</code><code>##

MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
MSWin32
Died at foo.cfg line 99.