foreach(@Array){
	$line	= shift(@Array);