From 318cacd918d78932e912e2587f95700bc6ada736 Mon Sep 17 00:00:00 2001 From: wasabi Date: Sat, 10 Aug 2024 14:40:01 -0500 Subject: [PATCH] cleaned up help output --- src/transfer.pl | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/src/transfer.pl b/src/transfer.pl index 4ac45cb..1531d2f 100755 --- a/src/transfer.pl +++ b/src/transfer.pl @@ -27,6 +27,7 @@ use Getopt::Long; # sane defaults my $path= ""; my $host = ""; +# get running user's name my $user = getlogin() || (getpwuid($<))[0] || $ENV{LOGNAME} || $ENV{USER}; my $dest= "/home/$user/Downloads/"; my $flags = "rvz"; @@ -108,12 +109,12 @@ sub transfer { sub help { print "Usage: $ARGV[0] --path [--dir] --host --user --dest [--flags ] [--verbose] [--help]\n --path - Input file to read or directory to copy - --host - IP address or hostname of the remote system\n - --dir - enable directory copy mode\n - --user - User account on the remote system to use\n - --dest - Destination on the remote system to copy files to\n - --flags - rsync flags to use when copying the files over. Defaults to rvz\n - --verbose - run rsync with -vvv\n + --host - IP address or hostname of the remote system + --dir - enable directory copy mode + --user - User account on the remote system to use + --dest - Destination on the remote system to copy files to + --flags - rsync flags to use when copying the files over. Defaults to rvz + --verbose - run rsync with -vvv --help - show this help\n"; } }