Robin Barker wrote: > --- ../libwww-perl-5.69/bin/lwp-download Thu Jan 3 02:09:24 2002 > +++ bin/lwp-download > @@ -109,8 +109,8 @@ > my $suffix = media_suffix($res->content_type); > $file .= ".$suffix" if $suffix; > } elsif ($rurl->scheme eq 'ftp' || > - $file =~ /\.tgz$/ || > - $file =~ /\.tar(\.(Z|gz))?$/ > + $file =~ /\.t[bg]z$/ || > + $file =~ /\.tar(\.(Z|[bg]z))?$/
While you're at it, why not adding .tar.bz2 as well ?
