print("Enter y or n to continue with synthesis \n");
my $choice = <STDIN>;
chop($choice);
if ($choice eq "y") {
  system (`qcmd.bat $toplevelentity`);
}
else {
	print "continue manually with synthesis\n";
}