call umount on DESTROY, support for optional 'invalidate' code ref which

[Fuse-DBI] / examples / webgui.pl

diff --git a/examples/webgui.pl b/examples/webgui.pl
index ce04fcf..e649e39 100755 (executable)
--- a/examples/webgui.pl
+++ b/examples/webgui.pl
@@ -25,9 +25,15 @@ my $sql_update = q{
                where oid = ?;
 };
 
-Fuse::DBI->run({
+my $mnt = Fuse::DBI->mount({
        filenames => $sql_filenames,
        read => $sql_read,
        update => $sql_update,
        dsn => 'DBI:Pg:dbname=webgui',
+       mount => '/mnt2',
 });
+
+print "Press enter to exit...";
+my $foo = <STDIN>;
+
+$mnt->umount;