- or download this
c:\test>junk0
'/' must follow a numeric type in unpack at c:\test\junk0.pl line 28,
+<FILE> chunk 10.
- or download this
my $s2 = unpack 'v/A*', substr $$ref2, $p2, $n2;
- or download this
$x = pack 'v/A*', 'x'x100;;
print unpack 'v/A*', $x;;
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
+xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx