struct mystruct{
      int                id[10];
      char               text[40];
      unsigned short int len;

##</code><code>##

      my(@ids,$text,$length) = unpack("N10C40n",$buff) ;