first of all thanks for the feedback! Having someone else spending his time looking at my code is something make me happy.

There are three issues:

1-the population of pic list

2-the bad event type or keysym "?" at..

3-the ERROR creating a thumbnail for file one

About the second i need to investigate a bit, because i do not understand it. The application has a binding to the ? key to popup a new mainwindow with the rendered POD. It also has some special unbinding for key ? for all Entry widgets.

This issue possibly resolve itself changing in the code all <KeyRelease-?> declaration into <KeyRelease-question> ones.

About the first issue you pose it is related to the list population: maybe i've badly explained in the documentation.

By default the app search the current directory for jpeg files: ie it globs ./*.jpg and build the list. If no image are found it complains about in the console.

perl c:\SCRIPTS\resized\picwoodpecker-v10.10.pl -s c:/scripts/resized/
+user -debug

build_list received [c:/scripts/resized/user]
DIR found: [c:/scripts/resized/user] will be converted to [c:/scripts/
+resized/user/*.jpg]
No file to process
[download]

If so you can select a new directory to search using the GUI: the button browse to choose the dir and new list one to populate it. Or you could simply write the dir or the glob expression into the source entry.

In the docs i put the phrase: Note the that the browse does not fill the list; you need to use new list or add to list after using it.

The app is already able to process png files: you must tell it using the source/glob expression:

perl c:\SCRIPTS\resized\picwoodpecker-v10.10.pl -s c:/scripts/*.png -d
+ebug

build_list received [c:/scripts/*.png]
Please wait while processing 6 files....
        adding c:/scripts/colorRamp.png
        adding c:/scripts/Mandelbrot_Love_by_sya.png
        adding c:/scripts/out.png
        adding c:/scripts/test.png
        adding c:/scripts/testHEX.png
        adding c:/scripts/testHEX2.png
[download]

Finally the thumbnail errors: the application search for and embedded thumbnail that usually is present in jpg photos but not in other files formats. If the embedded thumb is not present the program emit the error (maybe is better a warning?) and creates an empty one ie a black one using GD.

Perhaps the best behaviour is search for an embedded thumb and make it up a new one if not found. I'll put the program on github and I'll try to add suche feature.

thanks again

L*

I put the program on github: can you be so kind to try if the keysim error disappears using this release?

Thanks for your time.

L*

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.

— Ken