NYIMI Jose (BMB) wrote: > ... > I was thinking about unpack function but how to make it dynamic ? > > I mean writing : > my @items = unpack('A2 A2', $str); > Will work for $str='abdc'; > Not for $str='abcdef';
How about something like: my $s = 'abcdefghij'; my @x; ([EMAIL PROTECTED],$s) = unpack('a2 a*', $s) while length $s; print "@x\n"; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]