GrandFather,

I did show how to use the UnPack, but the following should demonstrate:

# Use:                                     ## n - number of 64bit pack
+ed numbers in string
# my @Numbers = UnPack( n, $stringpack );  ## string input, array outp
+ut

  my $pack = pack("N N", 0, 99 );
  my $Numbers = UnPack( 1, $pack );
  say $Numbers;
  ( $Numbers ) = UnPack( 1, $pack );
  say $Numbers;
  my @Numbers = UnPack( 1, $pack );
  say $Numbers[0];
  ( @Numbers ) = UnPack( 1, $pack );
  say $Numbers[0];

 __END__

 result:
  1
  99
  99
  99
[download]

On running this code, I could not reproduce my original statement, so I can only assume that I typed "$Numbers" instead of "@Numbers" when I wrote the test cases for 'sub UnPack'. But if I had put parenthesis around the scalar, I still would have gotten what I wanted ( list context ).

Thank you