Package: apt-cacher
Version: 1.7.33
Severity: minor
Perl shows warnings when executing apt-cacher-cleanup.pl in forky:
$ dpkg -l | grep apt-cacher
ii apt-cacher 1.7.33 all Caching proxy server for Debian/Ubuntu/Devuan
software repositories
$ dpkg -l | grep 'ii perl '
ii perl 5.42.2-3 amd64 Larry Wall's Practical Extraction and Report
Language
$ su -
Password:
$ /usr/share/apt-cacher/apt-cacher-cleanup.pl
Possible precedence problem between ! and pattern match (m//) at
/usr/share/apt-cacher/apt-cacher-cleanup.pl line 114.
Possible precedence problem between ! and pattern match (m//) at
/usr/share/apt-cacher/apt-cacher-cleanup.pl line 114.
$ cat /usr/share/apt-cacher/apt-cacher-cleanup.pl
...
# change uid and gid if root and another user/group configured
if (($cfg->{user} && $cfg->{user} !~ 'root' && !$> )
|| ($cfg->{group} && $cfg->{group} !~ 'root' && !$) =~ /^0/)){
...
Maybe it should be something like
if (($cfg->{user} && $cfg->{user} !~ 'root' && !$> )
|| ($cfg->{group} && $cfg->{group} !~ 'root' && !($) =~ /^0/))){
or
|| ($cfg->{group} && $cfg->{group} !~ 'root' && $) !~ /^0/)){
Thanks for apt-cacher!
Chris
