amassivus/clusterssh
1
0
Fork 0
mirror of https://github.com/duncs/clusterssh.git synced 2025-07-03 09:53:23 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Rename files to new locations

Browse source
This commit is contained in:
Duncan Ferguson 2009-12-19 17:20:53 +00:00
parent 8c78ee5abe
commit e33fa5face
3 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

0
ChangeLog → Changes
View file

0
src/cscp → bin/cscp
View file

14
src/cssh.pl → bin/cssh
View file

@ -1,4 +1,4 @@
# - perl *- #!/usr/bin/perl
# $Id$ # $Id$
# #
# Script: # Script:
@ -50,13 +50,11 @@
# http://www.opensource.org/licenses/gpl-license.php # http://www.opensource.org/licenses/gpl-license.php
# #
############################################################################ ############################################################################
my $VERSION = '3.28';
### all use statements ###
use strict; use strict;
use warnings; use warnings;
use 5.006_000; use 5.008_004;
use Pod::Usage; use Pod::Usage;
use Getopt::Long qw(:config no_ignore_case bundling no_auto_abbrev); use Getopt::Long qw(:config no_ignore_case bundling no_auto_abbrev);
use POSIX qw/:sys_wait_h strftime mkfifo/; use POSIX qw/:sys_wait_h strftime mkfifo/;
@ -79,10 +77,16 @@ use Carp;
use Sys::Hostname; use Sys::Hostname;
use English; use English;
use FindBin;
use lib $FindBin::Bin.'/../lib';
use App::ClusterSSH;
### all global variables ### ### all global variables ###
my $scriptname = $0; my $scriptname = $0;
$scriptname =~ s!.*/!!; # get the script name, minus the path $scriptname =~ s!.*/!!; # get the script name, minus the path
my $VERSION=$App::ClusterSSH::VERSION;
# Command line options list # Command line options list
my @options_spec = ( my @options_spec = (
'debug:+', 'debug:+',