|
version 1.3, 2008/02/15 18:36:22
|
version 1.4, 2008/02/15 21:14:37
|
|
|
|
| # n00 - for linux_ia32 machines such as n00, ..., n11, etc. | # n00 - for linux_ia32 machines such as n00, ..., n11, etc. |
| # n12 - for linux_x86_64 machines | # n12 - for linux_x86_64 machines |
| | |
| my($scriptpath) = $0; |
use Cwd qw(realpath); |
| |
|
| |
my($scriptpath) = realpath($0); |
| print STDOUT "make of JSOC $scriptpath\n"; | print STDOUT "make of JSOC $scriptpath\n"; |
| system("date"); | system("date"); |
| | |
| my($wd); | my($wd); |
| $wd = $scriptpath; | $wd = $scriptpath; |
| |
|
| if ($wd =~ /(.+)\/\S+$/) | if ($wd =~ /(.+)\/\S+$/) |
| { | { |
| $wd = $1; | $wd = $1; |
Return to
make_jsoc.pl
CVS log
Up to [Development] / JSOC