@newtest = days($test); foreach $num (@newtest) { print "$newtest[$num]\n"; } #### foreach $day (@newtest) { print $day,"\n"; }