Created attachment 1633450 [details]
Shutter SRPM

Description of problem:


Version-Release number of selected component (if applicable):


How reproducible:


Steps to Reproduce:
1. Install shutter `dnf install shutter`
2. Run shutter `/usr/bin/shutter`

Actual results:
shutter
"glob" is not exported by the File::Glob module
Can't continue after import errors at /usr/bin/shutter line 57.
BEGIN failed--compilation aborted at /usr/bin/shutter line 57.


Expected results:
Shutter GUI should have launched

Additional info:
Fedora 31 is shipped with Perl 5.30.  In 5.30, glob was changed to bsd_glob.  In order to fix the package, we must change two instances of "use File::Glob qw/ glob /;" to "use File::Glob qw/ bsd_glob /;".

I've attached a SRPM with a patch, and pasted a diff below.

Another solution would be to upgrade shutter to the latest version in Fedora 31

--- a/bin/shutter.orig  2019-11-06 14:20:48.048171058 -0600
+++ b/bin/shutter       2019-11-06 14:21:03.826458023 -0600
@@ -54,7 +54,7 @@
 
 #File operations
 use File::Copy qw/ cp mv /;
-use File::Glob qw/ glob /;
+use File::Glob qw/ bsd_glob /;
 use File::Basename qw/ fileparse dirname basename /;
 use File::Temp qw/ tempfile tempdir /;
 use File::Spec;
--- a/share/shutter/resources/modules/Shutter/Draw/DrawingTool.pm.orig  2019-11-06 14:23:27.629968586 -0600
+++ b/share/shutter/resources/modules/Shutter/Draw/DrawingTool.pm       2019-11-06 14:23:34.987091822 -0600
@@ -35,7 +35,7 @@
 use Exporter;
 use Goo::Canvas;
 use File::Basename qw/ fileparse dirname basename /;
-use File::Glob qw/ glob /;
+use File::Glob qw/ bsd_glob /;
 use File::Temp qw/ tempfile tempdir /;
 use Data::Dumper;
.