The short answer is "no". I ran exactly the same commands as shown previously and got exactly the same output.

My current perl:

$ perl -v | head -2 | tail -1
This is perl 5, version 24, subversion 0 (v5.24.0) built for darwin-th
+read-multi-2level
[download]

I have lots of Perl versions installed. What are you using?

I already had the latest Tk. I initially needed to install GD and Image::ExifTool. Here's the versions of all of those:

Tk 804.033
GD 2.56
Image::ExifTool 10.36
[download]

The shebang line change I made was minimal:

$ head -1 picwoodpecker.pl
#!/usr/bin/env perl
[download]

I don't really have the time to look closely at your 1,828 lines of code. I did quickly scroll through it. One thing I did notice was multiple function calls like:

&func
[download]

While that may be intentional, are you aware of the side effects (described in perlsub). The more usual form is:

func()
[download]

I didn't investigate whether those side effects had any bearing on the current issues.