In the spirit of "there's more than one way to do it", you could always try: my @c = map {join "", map {$_.$_} split //} qw(fc0 066 ffc 600 cff 090 ccc 666 fc9 633 cff 096 c9c 090); which seems a bit more elegant to me than declaring temp vars inside the map.
Attachment:
pgpp5aCb0D8f5.pgp
Description: PGP signature