Subversion Repositories camp_sysinfo_client_3

Rev

Rev 16 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16 Rev 26
Line 1... Line 1...
1 
#! /usr/bin/env perl
 1 
#! /usr/bin/env perl
2 
 
 2 
 
- 
 
 3 
use warnings;
- 
 
 4 
use strict;
- 
 
 5 
 
- 
 
 6 
our $VERSION = '1.0';
- 
 
 7 
 
3 
# get files from server
 8 
# get files from server
4 
my $saveDir = `pwd`;
 9 
my $saveDir = `pwd`;
5 
chomp $saveDir;
 10 
chomp $saveDir;
6 
chdir( '/tmp');
 11 
chdir( '/tmp');
7 
 
 12