- or download this
qwurx [shmem] ~ > perl -MO=Concise,-exec -e 'use constant foo=>"5"; $c
+=4+foo;'
1 <0> enter
...
5 <2> sassign vKS/2
6 <@> leave[1 ref] vKP/REFC
-e syntax OK
- or download this
qwurx [shmem] ~ > perl -MO=Concise,-exec -e 'sub foo(){"5"}; $c=4+foo;
+'
1 <0> enter
...
5 <2> sassign vKS/2
6 <@> leave[1 ref] vKP/REFC
-e syntax OK
- or download this
qwurx [shmem] ~ > perl -MO=Concise,-exec -e 'sub foo{"5"}; $c=4+foo;'
1 <0> enter
...
9 <2> sassign vKS/2
a <@> leave[1 ref] vKP/REFC
-e syntax OK