http://www.perlmonks.org?node_id=545423


in reply to Re: Length of unpacked string for "hex" data
in thread Length of unpacked string for "hex" data

Thanks, very cool. And I like the dispatch table trick as well; seems I have another app where that will be useful. For the present case I'll stick with your "if"; it's less intrusive than mine.

I noticed you used a lower-case "a" in the template:

"A2C/a"

Meaning to parse on a null-padded string rather than a space-padded one. Is that important here?

Cheers,
-Ken

"This bounty hunter is my kind of scum: Fearless and inventive." --J.T. Hutt

Replies are listed 'Best First'.
Re^3: Length of unpacked string for "hex" data
by ikegami (Patriarch) on Apr 24, 2006 at 23:01 UTC

    'A' will remove trailing NULs and whitespace.
    'a' will not.

    In other words,
    ($str) = unpack('c/A', $data);
    is equivalent to
    ($str) = unpack('c/a', $data);
    $str =~ s/[\0\s]+$//;