Parent Directory | Revision Log | Patch
revision 1.4 by dpavlin, Tue Aug 5 10:01:42 2003 UTC | revision 1.5 by dpavlin, Tue Aug 5 21:10:28 2003 UTC | |
---|---|---|
# | Line 6 eval '(exit $?0)' && eval 'exec perl -S | Line 6 eval '(exit $?0)' && eval 'exec perl -S |
6 | & eval 'exec perl -S $0 $argv:q' | & eval 'exec perl -S $0 $argv:q' |
7 | if 0; | if 0; |
8 | ||
9 | use lib "/usr/share/postgresql/contrib"; | BEGIN { |
10 | my $basedir = $0; $basedir =~ s#/[^/]+$##; | |
11 | unshift(@INC, "$basedir/../share"); | |
12 | } | |
13 | ||
14 | use IO::File; | use IO::File; |
15 | use Getopt::Long; | use Getopt::Long; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |