These lines of code cause the segfault and core dump:

Awesome, which line exactly?

The next step is to find which line exactly and create a minimal program which reproduces the bug :)

It could be Bug #29640 for Tk: Memory Issus with TK::Photo and -data option