therealjasonkenney · March 13, 2014 01:44
diff --git a/game_of_code b/game_of_code
 #!/usr/bin/perl

 sub win() { 
  print   "Do the right thing? (Y/N) ";
  return  <STDIN> =~ /^[Nn](O|o|)$/;
 }

 1 while win or die;
	#!/usr/bin/perl

	sub win() {
	print "Do the right thing? (Y/N) ";
	return <STDIN> =~ /^[Nn](O\|o\|)$/;
	}

	1 while win or die;