in reply to How do I double up elements within an array?

Map is your friend: 
@doubled = map({$_, $_} @orig);

[download]

In Section Seekers of Perl Wisdom