my $statsFile = Logger->new(
name => ".$FindBin::Script.stats",
path => $ENV{HOME},
my $statsFile = Logger->new(
name => ".$FindBin::Script.stats",
path => $ENV{HOME},
open my $file, '>', $filename
or error "Unable to open $filename for writing - $!", 1;
open my $file, '>', $filename
or error "Unable to open $filename for writing - $!", 1;
# We don't need to do anything here, just handle the interrupt and
# let the while loop continue.
debug 'SwitchWallPaper: Interrupt received';
# We don't need to do anything here, just handle the interrupt and
# let the while loop continue.
debug 'SwitchWallPaper: Interrupt received';