Help for this page

Select Code to Download


  1. or download this
    $x = pack 'c/a*N', '12345123451234512345', 99999;

print for unpack 'c/a* N', $x;
12345123451234512345
99999
  2. or download this
    print for unpack 'cXc/a* N', $x;
20
12345123451234512345
99999