for my $item ( in $bbData)   {

    print 'Dumper $item: ',  Dumper $item   . "\n";
         #   
  }

##</code><code>##

-1
subMode: 1
Error: 0
Dumper $bbData: $VAR1 = bless( do{\(my $o = 27085052)}, 'Win32::OLE::Variant' );
Can't locate object method "in" via package "Win32::OLE::Variant" at tstblpSubscribe.pl line 43.