I have a variable $count (range=1 to N), and arrays a_1,a_2,a_3...a_N. My requirement is: if $count==1:

foreach $i1 (@ a_1) {
  print $i1;
}
[download]

if $count==2:

foreach $i1 (@ a_1) {
foreach $i2 (@ a_2) {
  print $i1,$i2;
}
}
[download]

if $count==3:

foreach $i1 (@ a_1) {
foreach $i2 (@ a_2) {
foreach $i3 (@ a_3) {
  print $i1,$i2,$i3;
}
}
}
[download]

So on... In short i need "variable" number of foreach loops based on variable "$count" Is this possible in PERL?