my $result = join "", map sprintf("%02s", $_), split /:/, $foo;
[download]

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.