Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re: A bit of fun with pack/unpack

by moritz (Cardinal)
on Jun 28, 2013 at 17:17 UTC ( #1041292=note: print w/replies, xml ) Need Help??

in reply to A bit of fun with pack/unpack

You can shave off a few characters by not using parens, and the blockless form of map:

use strict; use warnings; @==map unpack('B24',pack'V',$_),12580855,16776063,103792,10764419,8561 +235,856483,1974885; for$"($[..23){$:=$[;for$\($[..6){$:.=substr $=[$\],$",!$[}print pack'B +8',$:}print$/;

Replies are listed 'Best First'.
Re^2: A bit of fun with pack/unpack
by FloydATC (Deacon) on Jun 30, 2013 at 12:04 UTC

    That's so much better, thanks for the tip :-D

    -- FloydATC

    Time flies when you don't know what you're doing

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1041292]
shmem puts down the Canon garments and dresses as Chancellor
[vrk]: Congratulations. You should have Cookies
[shmem]: thanks vrk - but I'll rather have a plate of "silly con charme"

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (3)
As of 2017-04-28 09:35 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (520 votes). Check out past polls.