$ PERLDB_OPTS="NonStop frame=31" perl -dle 'sub abc { return $_[0] + 1 } print join qq(\t), abc(0), abc(1+2)'
Package -e.
in  @=main::abc(0) from -e:1
out @=main::abc(0) from -e:1
list context return from main::abc:
0  1
in  @=main::abc(3) from -e:1
out @=main::abc(3) from -e:1
list context return from main::abc:
0  4
1       4