Re: unpack format string for ignoring chars

[BrowserUk]

Like this?

print join '|', unpack '( a4 x10 )2 a4', 'this not that this not that 
+this';

this|this|this

Or was it like that:)

[LanceDeeply]

thanks!

i just didnt know how to use x properly, got a little confused reading the doc.
i added x1 to the format string wherever i wanted to ignore a character


    my $count = 0;
    foreach my $len (@lens)
    {
        if ( $count ++ ) 
        {
            $format .= "x1";
        }
        $format .= "A$len";
    }

does the deed nicely