print Data::Dumper->Dump([$sb]);

##</code><code>##

$VAR1 = bless( [
                 '100',
                 [
                   [
                     '2593140',
                     '2766860',
                     '0',
                     undef,
                     undef,
                     undef,
                     undef,
                     '0UI38923424239K',
                     '2002-01-10 09:16:50',
                     '1500',
                     'None Given',
                     '£',
                     'GBP'
                   ],
                   [
                     '2513902',
                     '2766861',
                     '1',
                     undef,
                     undef,
                     undef,
                     undef,
                     'LKJS3892342423Y5S',
                     '2002-01-10 09:16:54',
                     '1500',
                     'None Given',
                     '£',
                     'GBP'
                   ],
                   [
                     '2574165',
                     '2766862',
                     '0',
                     undef,
                     undef,
                     undef,
                     undef,
                     '0ASJH2782121S',
                     '2002-01-10 09:16:57',
                     '1500',
                     'None Given',
                     '£',
                     'GBP'
                   ],

                   ........etc

##</code><code>##

 
print Data::Dumper->Dump($sb->[1]);

##</code><code>##

$VAR1 = [
          '2593140',
          '2766860',
          '0',
          undef,
          undef,
          undef,
          undef,
          '0UI38923424239K',
          '2002-01-10 09:16:50',
          '1500',
          'None Given',
          '£',
          'GBP'
        ];

##</code><code>##

print Data::Dumper->Dump($sb->[1]->[$anumber]);