| CC: | perl5-porters [...] perl.org, dhouston [...] cpan.org, bug-Bing-Search [...] rt.cpan.org |
| Subject: | [perl #109210] Bing::Search handles Web_Offset incorrectly, I have a patch |
| Date: | Fri, 27 Jan 2012 12:49:26 -0800 |
| To: | "OtherRecipients of perl Ticket #109210":; |
| From: | "Father Chrysostomos via RT" <perlbug-followup [...] perl.org> |
Bing Search is not maintained as part of perl, but separately. I’m
forwarding this to the CPAN RT queue.
On Fri Jan 27 08:22:45 2012, lourens@cs.vu.nl wrote:
Show quoted text
>
> This is a bug report for perl from lourens@cs.vu.nl,
> generated with the help of perlbug 1.39 running under perl 5.12.3.
>
>
> -----------------------------------------------------------------
> [Please describe your issue here]
> The Bing::Search module handles the Web_Offset parameter incorrectly:
> It sends the Web_Count instead of the Web_Offset value to Bing.
>
> Bing/Search/Role/WebRequest/Offset.pm needs to be patched:
> *** Offset.pm 2012-01-27 17:08:27.000000000 +0100
> --- Offset.pm.orig 2012-01-27 17:06:54.000000000 +0100
> ***************
> *** 28,34 ****
> my $self = shift;
> if( $self->has_Web_Offset ) {
> my $hash = $self->params;
> ! $hash->{'Web.Offset'} = $self->Web_Offset;
> $self->params( $hash );
> }
> };
> --- 28,34 ----
> my $self = shift;
> if( $self->has_Web_Offset ) {
> my $hash = $self->params;
> ! $hash->{'Web.Offset'} = $self->Web_Count;
> $self->params( $hash );
> }
> };
>
>
>
> [Please do not change anything below this line]
> -----------------------------------------------------------------
> ---
> Flags:
> category=utilities
> severity=high
> ---
> Site configuration information for perl 5.12.3:
>
> Configured by assp at Mon Aug 29 07:17:14 PDT 2011.
>
> Summary of my perl5 (revision 5 version 12 subversion 3)
> configuration:
>
> Platform:
> osname=darwin, osvers=10.8.0, archname=darwin-multi-2level
> uname='darwin beta.macosforge.org 10.8.0 darwin kernel version
> 10.8.0: tue jun 7 16:33:36 pdt 2011; root:xnu-
> 1504.15.3~1release_i386 i386 '
> config_args='-D inc_version_list=5.12.2/darwin-multi-2level 5.12.2
> 5.12.1/darwin-multi-2level 5.12.1 5.12.0/darwin-multi-2level 5.12.0
> -des -Dprefix=/opt/local -Dscriptdir=/opt/local/bin
> -Dcppflags=-I/opt/local/include -Dccflags=-pipe -O2 -arch x86_64
> -Dldflags=-L/opt/local/lib -arch x86_64 -Dvendorprefix=/opt/local
> -Dusemultiplicity=y -D cc=/usr/bin/gcc-4.2 -D ld=/usr/bin/gcc-4.2
> -D man1ext=1pm -D man3ext=3pm -D man1dir=/opt/local/share/man/man1p
> -D man3dir=/opt/local/share/man/man3p -D
> siteman1dir=/opt/local/share/man/man1 -D
> siteman3dir=/opt/local/share/man/man3 -D
> vendorman1dir=/opt/local/share/man/man1 -D
> vendorman3dir=/opt/local/share/man/man3 -D pager=/usr/bin/less -sR'
> hint=recommended, useposix=true, d_sigaction=define
> useithreads=undef, usemultiplicity=define
> useperlio=define, d_sfio=undef, uselargefiles=define,
> usesocks=undef
> use64bitint=define, use64bitall=define, uselongdouble=undef
> usemymalloc=n, bincompat5005=undef
> Compiler:
> cc='/usr/bin/gcc-4.2', ccflags ='-pipe -O2 -arch x86_64
> -fno-common -DPERL_DARWIN -I/opt/local/include -no-cpp-precomp
> -fno-strict-aliasing -fstack-protector -I/opt/local/include',
> optimize='-O3',
> cppflags='-I/opt/local/include -no-cpp-precomp -pipe -O2 -arch
> x86_64 -fno-common -DPERL_DARWIN -I/opt/local/include
> -no-cpp-precomp -fno-strict-aliasing -fstack-protector
> -I/opt/local/include'
> ccversion='', gccversion='4.2.1 (Apple Inc. build 5666) (dot 3)',
> gccosandvers=''
> intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
> d_longlong=define, longlongsize=8, d_longdbl=define,
> longdblsize=16
> ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t',
> lseeksize=8
> alignbytes=8, prototype=define
> Linker and Libraries:
> ld='env MACOSX_DEPLOYMENT_TARGET=10.6 /usr/bin/gcc-4.2', ldflags
> ='-L/opt/local/lib -arch x86_64 -fstack-protector'
> libpth=/opt/local/lib /usr/lib
> libs=-lgdbm -ldbm -ldl -lm -lutil -lc
> perllibs=-ldl -lm -lutil -lc
> libc=, so=dylib, useshrplib=false, libperl=libperl.a
> gnulibc_version=''
> Dynamic Linking:
> dlsrc=dl_dlopen.xs, dlext=bundle, d_dlsymun=undef, ccdlflags=' '
> cccdlflags=' ', lddlflags='-L/opt/local/lib -arch x86_64 -bundle
> -undefined dynamic_lookup -fstack-protector'
>
> Locally applied patches:
>
>
> ---
> @INC for perl 5.12.3:
> /opt/local/lib/perl5/site_perl/5.12.3/darwin-multi-2level
> /opt/local/lib/perl5/site_perl/5.12.3
> /opt/local/lib/perl5/vendor_perl/5.12.3/darwin-multi-2level
> /opt/local/lib/perl5/vendor_perl/5.12.3
> /opt/local/lib/perl5/5.12.3/darwin-multi-2level
> /opt/local/lib/perl5/5.12.3
> /opt/local/lib/perl5/site_perl
> /opt/local/lib/perl5/vendor_perl
> .
>
> ---
> Environment for perl 5.12.3:
> DYLD_LIBRARY_PATH (unset)
> HOME=/Users/lourens
> LANG=en_US.UTF-8
> LANGUAGE (unset)
> LC_ALL=en_US.UTF-8
> LC_COLLATE=en_US.UTF-8
> LD_LIBRARY_PATH (unset)
> LOGDIR (unset)
>
PATH=/Users/lourens/wrk/kyoto/Alpino/bin:/usr/local/mysql/bin:/Users/lourens/bin:/opt/local/bin:/opt/local/sbin:/usr/bin:/bin:/usr/sbin:/sbin:/usr/local/bin:/usr/X11/bin:/usr/X11/bin:/usr/local/bin
Show quoted text> PERL_BADLANG (unset)
> SHELL=/bin/bash
--
Father Chrysostomos
---
via perlbug: queue: perl5 status: new
https://rt.perl.org:443/rt3/Ticket/Display.html?id=109210