title: Can't use an undefined value as an ARRAY reference
body: <p>I have a simple script written in perl, and i keep getting this particular error when i try to run. The script is for generating some numbers for use in checking integer to floating point. This is the particular error i get.</p>
  
  <p><code>Can't use an undefined value as an ARRAY reference at /tools/oss/packages/i86pc-5.10/perl/5.8.8-32/lib/5.8.8/Math/BigInt/Calc.pm line 1180</code></p>
  
  <p>From the error message am not able to figure out where my code is going wrong. By the way i need to use 64 bit numbers. How do i debug this issue? </p>
  
  <p>Here is the code sample</p>
  
  <pre><code>use bignum;
  use warnings;
  use strict;
  
  open(VCVT, "&gt;CvtIntToFp") or die "couldn't open file to write:$!";
  
  my $number;
  my $sgn;
  
  # left with 31 bits excluding the sign
  # 23 bits of significand needed, all the result
  # will be exact except where leading bit ignoring singn is &gt;23
  # take its 2's complement to get the negative number  and put it
  # into the register
  # 32 bit number 1 bit sign 31 left any number with leading 1 @position &gt;23 (counting from 0) will be inexact when in floating point
  # 30-24 bit positons can have a leading ones at at any position and result is an inexact
  
  my $twoPwr32 = 0x100000000; #2**32
  
  my @num=();
  
  for(my $i=0; $i&lt;100; $i++)
  {
      $sgn = (rand()%2);
      my $tempLead = (rand()%7); # there are 7 bits from 24 to 30
      $number=$tempLead &lt;&lt; 24;
      if($sgn)
      {$number = ($twoPwr32- $number +1) &amp; 0xffffffff;
      }
      $number = sprintf("%x", $number);
      push(@num, $number);
  }
  my $item=0;
  foreach $item (@num)
  {
      print "$item\n";
      print VCVT "$item\n";
  }
  </code></pre>