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	#!/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