{
Film->nocache(1);
-
+
my $film1 = Film->retrieve( "This Is Spinal Tap" );
my $film2 = Film->retrieve( "This Is Spinal Tap" );
$film1->Director("Marty DiBergi");
is $film2->Director, "Rob Reiner",
'caching turned off';
-
+
$film1->discard_changes;
}