Help for this page

Select Code to Download


  1. or download this
      my @Column_Info = { [ 1024, 1067 ],     # Column 1 start stop
                          [ 1068, 1093 ],     # Column 2 start stop
    ...
                          [ 1208, 1233 ],     # Column 6 start stop
                          [ 1234, 1277 ],     # Column 7 start stop
                          [ 1278, 1321 ] };   # Column 8 start stop
    
  2. or download this
        my $StartPos = $Column_Info{$Count->[0]};    # Slot to start at
        my $Pos = $StartPos;    # Slot to start at
    ...
          while ($Pos <= $EndPos) {
            if ($Pos == 1024) {
    <snip>
    
  3. or download this
    Use of uninitialized value in numeric le (<=) at ./show_library.pl lin
    +e 143, <IN> line 69.
    Use of uninitialized value in printf at ./show_library.pl line 140, <I
    +N> line 70.