upstream.perl-webget: (regexp): improve