Name "main::capture(5)" used only once: possible typo at strange.pl line 15.
Use of uninitialized value in eval "string" at strange.pl line 15.

No eval        :1
In str eval    :1
In block eval  :1
Block Eval ret :1
Str Eval ret   :0