##this runs the entire list at once

@list=(1,2,3);                #list

while(<@list>){              #I loop the list	
		
	if (fork){          #with the loop I run the whole list at once
		
		print "$_\n";     #I do my stuff

	exit;
	}
}