Select Code to Download

  my $test = Foo->new();
  my $test2 = Foo->new();
...
  $test2->read_write("wine");
  print "test: should be water, is ", $test->read_write, "\n";
  print "test2: should be wine, is ", $test2->read_write, "\n";

  test: should be water, is wine
  test2: should be wine, is wine