[freeside-commits] freeside/bin pg-version,NONE,1.1

Ivan,,, ivan at wavetail.420.am
Wed Dec 27 23:02:22 PST 2006


Update of /home/cvs/cvsroot/freeside/bin
In directory wavetail:/tmp/cvs-serv5701

Added Files:
	pg-version 
Log Message:
adding pg-version

--- NEW FILE: pg-version ---
#!/usr/bin/perl -w

use strict;
use FS::UID qw(adminsuidsetup dbh);

my $user = shift or die &usage;
adminsuidsetup($user);

print "pg_server_version: ". dbh->{'pg_server_version'}. "\n";

sub usage {
  "\n\nUsage: pg-version username\n";
};



More information about the freeside-commits mailing list