Skip Menu |
 

This queue is for tickets about the Math-Prime-TiedArray CPAN distribution.

Report information
The Basics
Id: 58151
Status: new
Priority: 0/
Queue: Math-Prime-TiedArray

People
Owner: Nobody in particular
Requestors: user42 [...] zip.com.au
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



From gg [...] zip.com.au Fri Jun 4 18: 57:51 2010
MIME-Version: 1.0
X-Spam-Status: No, score=-10.556 tagged_above=-99.9 required=10 tests=[AWL=0.043, BAYES_00=-2.599, RCVD_IN_DNSWL_HI=-8] autolearn=ham
X-Spam-Flag: NO
X-Virus-Checked: Checked by ClamAV on 16.mx.develooper.com
Content-Type: multipart/mixed; boundary="=-=-="
Message-ID: <87typi76co.fsf [...] blah.blah>
X-Virus-Scanned: Debian amavisd-new at bestpractical.com
X-Spam-Score: -10.556
Received: from localhost (localhost [127.0.0.1]) by hipster.bestpractical.com (Postfix) with ESMTP id 680A3240849 for <cpan-bug+Math-Prime-TiedArray [...] hipster.bestpractical.com>; Fri, 4 Jun 2010 18:57:51 -0400 (EDT)
Received: from hipster.bestpractical.com ([127.0.0.1]) by localhost (hipster.bestpractical.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id gDCNI-xHyseF for <cpan-bug+Math-Prime-TiedArray [...] hipster.bestpractical.com>; Fri, 4 Jun 2010 18:57:50 -0400 (EDT)
Received: from la.mx.develooper.com (x1.develooper.com [207.171.7.70]) by hipster.bestpractical.com (Postfix) with SMTP id C777B240844 for <bug-Math-Prime-TiedArray [...] rt.cpan.org>; Fri, 4 Jun 2010 18:57:49 -0400 (EDT)
Received: (qmail 18043 invoked by uid 103); 4 Jun 2010 22:58:41 -0000
Received: from x16.dev (10.0.100.26) by x1.dev with QMQP; 4 Jun 2010 22:58:41 -0000
Received: from mailout2-15.pacific.net.au (HELO mailout2.pacific.net.au) (125.255.80.142) by 16.mx.develooper.com (qpsmtpd/0.80) with ESMTP; Fri, 04 Jun 2010 15:58:40 -0700
Received: from mailproxy2.pacific.net.au (mailproxy2.pacific.net.au [61.8.2.163]) by mailout2.pacific.net.au (Postfix) with ESMTP id C3ECF1CE7F1 for <bug-Math-Prime-TiedArray [...] rt.cpan.org>; Sat, 5 Jun 2010 08:58:36 +1000 (EST)
Received: from blah.blah (ppp2C64.dyn.pacific.net.au [61.8.44.100]) by mailproxy2.pacific.net.au (Postfix) with ESMTP id 64C7427407 for <bug-Math-Prime-TiedArray [...] rt.cpan.org>; Sat, 5 Jun 2010 08:58:36 +1000 (EST)
Received: from gg by blah.blah with local (Exim 4.71) (envelope-from <gg [...] zip.com.au>) id 1OKfqR-0001ok-Ui for bug-Math-Prime-TiedArray [...] rt.cpan.org; Sat, 05 Jun 2010 08:58:32 +1000
Delivered-To: cpan-bug+Math-Prime-TiedArray [...] hipster.bestpractical.com
User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/23.2 (gnu/linux)
Subject: shift offset and plain fetch
Return-Path: <gg [...] zip.com.au>
X-RT-Mail-Extension: math-prime-tiedarray
X-Original-To: cpan-bug+Math-Prime-TiedArray [...] hipster.bestpractical.com
X-Spam-Check-BY: 16.mx.develooper.com
Date: Sat, 05 Jun 2010 08:58:31 +1000
X-Spam-Level:
To: bug-Math-Prime-TiedArray [...] rt.cpan.org
From: Kevin Ryde <user42 [...] zip.com.au>
Content-Length: 0
X-RT-Original-Encoding: ascii
content-type: text/plain; charset="utf-8"
Content-Length: 249
Download (untitled) / with headers
text/plain 249b
With Math::Prime::TiedArray 0.04 the program foo.pl below prints 2 3 5 2 where I hoped the last number would be 7, since that's the next prime after shifting off the first 3, the same as it would be from an ordinary untied array.
Content-Type: text/x-perl
content-disposition: inline; filename="foo.pl"
Content-Length: 203
Download foo.pl
text/x-perl 203b
use strict; use warnings; use Math::Prime::TiedArray; tie my @primes, "Math::Prime::TiedArray"; print shift(@primes), "\n"; print shift(@primes), "\n"; print shift(@primes), "\n"; print $primes[0],"\n";


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.