1 |
#!/usr/bin/perl |
2 |
|
3 |
## -------------------------------------------------------------------------------- |
4 |
## $Id: releaseMe.pl,v 1.1 2003/01/20 21:22:18 joko Exp $ |
5 |
## -------------------------------------------------------------------------------- |
6 |
## $Log: releaseMe.pl,v $ |
7 |
## Revision 1.1 2003/01/20 21:22:18 joko |
8 |
## + initial check-in |
9 |
## calls some scripts at 'perl/scripts/shortcuts' to get a software-package (directory) packaged and published to (in this case) 'http://netfrag.org/~joko/computing/releases/01-snapshots/' |
10 |
## |
11 |
## -------------------------------------------------------------------------------- |
12 |
|
13 |
|
14 |
use strict; |
15 |
use warnings; |
16 |
|
17 |
use lib qw( ../libs ); |
18 |
use org::netfrag::preambel; |
19 |
|
20 |
|
21 |
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - main |
22 |
|
23 |
use org::netfrag::shortcuts qw( run_cmd ); |
24 |
|
25 |
print "Trying to release 'outlook2ldap'.", "\n"; |
26 |
chdir '../../'; |
27 |
run_cmd("release.pl outlook2ldap"); |
28 |
|
29 |
1; |
30 |
__END__ |