outlook2ldap/bin/releaseMe.pl

#!/usr/bin/perl

## --------------------------------------------------------------------------------
##  $Id: feed.pl,v 1.3 2003/01/20 16:29:48 joko Exp $
## --------------------------------------------------------------------------------
##  $Log: feed.pl,v $
## --------------------------------------------------------------------------------


use strict;
use warnings;

# determine and set 'libpath' at runtime, but before execution
my $libpath;
BEGIN {
  use FindBin qw($Bin);
  $libpath = "$Bin/../../../libs";
}

# use '$libpath' path to look for additional modules
use lib $libpath;


# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   main

use org::netfrag::shortcuts qw( run_cmd );

print "Trying to release 'outlook2ldap'.", "\n";
chdir '../../';
run_cmd("release.pl outlook2ldap");

1;
__END__
1	joko	1.1	#!/usr/bin/perl
2
3			## --------------------------------------------------------------------------------
4			## $Id: feed.pl,v 1.3 2003/01/20 16:29:48 joko Exp $
5			## --------------------------------------------------------------------------------
6			## $Log: feed.pl,v $
7			## --------------------------------------------------------------------------------
8
9
10			use strict;
11			use warnings;
12
13			# determine and set 'libpath' at runtime, but before execution
14			my $libpath;
15			BEGIN {
16			use FindBin qw($Bin);
17			$libpath = "$Bin/../../../libs";
18			}
19
20			# use '$libpath' path to look for additional modules
21			use lib $libpath;
22
23
24			# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - main
25
26			use org::netfrag::shortcuts qw( run_cmd );
27
28			print "Trying to release 'outlook2ldap'.", "\n";
29			chdir '../../';
30			run_cmd("release.pl outlook2ldap");
31
32			1;
33			__END__
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26