syntax error near unexpected token `;'

#/usr/bin/perl

until ($name eq "");
do {
	print "Enter another name, or Enter to stop:\n" ;
	$name = <STDIN>;
	chomp ($name);
	push @namelist,$name;	

}

print @namelist


$ ./generate_namelist.pl
./generate_namelist.pl: line 6: syntax error near unexpected token `;'
./generate_namelist.pl: line 6: `	$name = <STDIN>;'


Thanks for any advice,

Best Regards,

• syntax error near unexpected token `;' by lina
• Re: syntax error near unexpected token `;' by Parag Kalra
• Re: syntax error near unexpected token `;' by lina