DB<20> print join " ", reverse split /(..)/ , sprintf "%06x\n", 2*10**$_ for 0..5 02 00 00 14 00 00 c8 00 00 d0 07 00 20 4e 00 40 0d 03 DB<21>