diff options
author | Mike Gabriel <mike.gabriel@das-netzwerkteam.de> | 2017-06-27 09:20:01 +0200 |
---|---|---|
committer | Mike Gabriel <mike.gabriel@das-netzwerkteam.de> | 2017-06-27 09:20:01 +0200 |
commit | d58d498d7251dbf3ea1e732a1ef16a0bf2651216 (patch) | |
tree | 4f622e00fdbc9665475a1de2ca8eddf3added174 /arctica-testclient-nx3 | |
parent | 145b5748eed6754d47bb37b41aa1f026594be1a3 (diff) | |
download | arctica-testclients-d58d498d7251dbf3ea1e732a1ef16a0bf2651216.tar.gz arctica-testclients-d58d498d7251dbf3ea1e732a1ef16a0bf2651216.tar.bz2 arctica-testclients-d58d498d7251dbf3ea1e732a1ef16a0bf2651216.zip |
Diffstat (limited to 'arctica-testclient-nx3')
-rwxr-xr-x | arctica-testclient-nx3 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/arctica-testclient-nx3 b/arctica-testclient-nx3 index bf488cc..ec9c4bf 100755 --- a/arctica-testclient-nx3 +++ b/arctica-testclient-nx3 @@ -61,6 +61,14 @@ ################################################################################ @SIG{qw( INT TERM HUP )} = sub {print "TERMINATE!!! ($_[0])\n";cleanup();}; + +use File::Basename; + +if (($#ARGV == -1) || (!( $ARGV[0] =~ m/.*@.*/))) { + printf ("\nusage: %s <user>@<host>\n\n", basename($0)); + exit (0); +} + my $local_tadir = `arctica-getdir 2>/dev/null`;$local_tadir =~ s/\n//g; # CHANGE USERNAME AND IP/HOST: my $usernamenhost = $ARGV[0]; |