http://www.perlmonks.org?node_id=145740


in reply to Arrays and Loops

Use mapcar:
use mapcar; my @data = mapcar { "$_[0] is on $_[2] duty at $_[1]" } ( \@name, \@ti +me, \@duty ); print join "\n", @data;

-----------------------------------------------------
Dr. Michael K. Neylon - mneylon-pm@masemware.com || "You've left the lens cap of your mind on again, Pinky" - The Brain
"I can see my house from here!"
It's not what you know, but knowing how to find it if you don't know that's important