/[fuse_dbi]/trunk/examples/webgui.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/examples/webgui.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 27 by dpavlin, Fri Oct 8 22:56:55 2004 UTC revision 45 by dpavlin, Tue Nov 23 23:49:24 2004 UTC
# Line 182  my $sql = { Line 182  my $sql = {
182  my $dsn = $config->param('dsn');  my $dsn = $config->param('dsn');
183  my $db;  my $db;
184    
185  if ($dsn =~ m/DBI:(mysql|pg):/) {  if ($dsn =~ m/DBI:(mysql|pg):/i) {
186          $db = $1;          $db = lc($1);
187  } else {  } else {
188          print STDERR "can't find supported database (mysql/pg) in dsn: $dsn\n";          print STDERR "can't find supported database (mysql/pg) in dsn: $dsn\n";
189          exit 1;          exit 1;
# Line 210  my $mnt = Fuse::DBI->mount({ Line 210  my $mnt = Fuse::DBI->mount({
210          },          },
211  });  });
212    
213    if (! $mnt) {
214            print STDERR "can't mount filesystem!";
215            exit 1;
216    }
217    
218  print "Press enter to exit...";  print "Press enter to exit...";
219  my $foo = <STDIN>;  my $foo = <STDIN>;
220    
# Line 221  C<Fuse::DBI> website Line 226  C<Fuse::DBI> website
226  L<https://www.rot13.org/~dpavlin/fuse_dbi.html>  L<https://www.rot13.org/~dpavlin/fuse_dbi.html>
227    
228  C<FUSE (Filesystem in USErspace)> website  C<FUSE (Filesystem in USErspace)> website
229  L<http://sourceforge.net/projects/avf>  L<http://fuse.sourceforge.net/>
230    
231  =head1 AUTHOR  =head1 AUTHOR
232    
Legend:
Removed from v.27  
changed lines
  Added in v.45
  ViewVC Help
Powered by ViewVC 1.1.26