# add device text
# these need to be adjusted to 
# position correctly below category labels
$row2    += 23;
$col2     = 4;
my $width = 4;

for my $device (@device){
  my $text = $book->add_shape( type => 'rect', text => $device, line=>1 );
  $worksheet2->insert_shape( $row2, $col2, $text );
  $col2 += $width;
}