Help for this page
foreach $num (@test) { print $test[$num] . "\n"; }
for($num=0;$num<@test;$num++) { print $test[$num] . "\n"; }