my $choice;
while (1) {
	print "\nDo you want to continue : ";
	chomp($choice = <STDIN>);

	if ($choice eq "y" || $choice eq "n") {
		last;
	} else {
		print "\nERROR:Invalid Choice\n";
	}
}