$>perl test4.pl $VAR1 = bless( { '' => { 'length' => 14, 'mask' => 'iZ10', 'tag' => 'send', 'buffers' => [ \undef, \undef ] }, 'prevpass' => ${$VAR1->{''}{'buffers'}[1]}, 'answer' => ${$VAR1->{''}{'buffers'}[0]} }, 'C::Include::Struct' ); Size of struct send: 14 bytes Size of unsigned long: 4 bytes 00000000: 01 00 00 00 30 31 32 33 ¦ 34 35 36 37 38 00  012345678 $>