#line 10 Foo
warn;
eval <<"BAZ";
#line 100 Bar
warn;
BAZ
warn;