Re^4: Bug in eval in pre-5.14

OK, and now change {1} in the object's destructor to { die 'inside' } - all other cases still catch the Exception #, but Splacker catches the inner one.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

Comment on Re^4: Bug in eval in pre-5.14 Select or Download Code

Replies are listed 'Best First'.
Re^5: Bug in eval in pre-5.14 by $h4X4_\|=73}{ (Monk) on Aug 14, 2016 at 10:16 UTC
The output for me made it look like they all bugged out. Notice they all have the same message and line number.`eval` is hiding a warning from us now with `die` replacing the number one and this is "just another bug". `Caught with Splacker: inside at C:\xampp\cgi-bin\Test\index.cgi line 2 +3. Caught with $@: inside at C:\xampp\cgi-bin\Test\index.cgi line 23. Caught with or: inside at C:\xampp\cgi-bin\Test\index.cgi line 23. Caught with Try::Tiny: inside at C:\xampp\cgi-bin\Test\index.cgi line +23. 5.008008` [download] To catch the hidden error by using the code below, it will work with AND WITHOUT! warnings on... "in cleanup" warnings generated from destructor errors are no longer enabled by "use warnings" `$SIG{ __WARN__} = sub { exit 1 if $_[0] =~ /in cleanup/ };`	[reply] [d/l] [select]
Re^6: Bug in eval in pre-5.14 by choroba (Cardinal) on Aug 14, 2016 at 11:19 UTC
Time to upgrade, it seems. `5.020001 Caught with Splacker: inside at ./1.pl line 23. Caught with $@: Exception 1! at ./1.pl line 45. Caught with or: Exception 2! at ./1.pl line 54. Caught with Try::Tiny: Exception 3! at ./1.pl line 65.` [download] ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7**2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l] [select]


P is for Practical
	PerlMonks