diff options
author | Joey Hess <joeyh@joeyh.name> | 2020-11-19 11:07:49 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2020-11-19 11:07:49 -0400 |
commit | bee772e4b84b8006476e451f78f13b7ad3f9a440 (patch) | |
tree | d423a821d3df0bf9541a084d8cbaa2e8f1f10c1f | |
parent | 65e8e149a0dd2eb1c0f938904e6f62e91d4b29ce (diff) | |
download | moreutils-bee772e4b84b8006476e451f78f13b7ad3f9a440.tar.gz |
add usage help
-rwxr-xr-x | vipe | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -57,7 +57,9 @@ use Getopt::Long; $/=undef; my $suffix = ""; -GetOptions("suffix=s" => \$suffix) or die; +if (! GetOptions("suffix=s" => \$suffix)) { + die "Usage: $0 [--suffix=extension]\n"; +} $suffix = ".$suffix" if $suffix =~ m/^[^.]/; my ($fh, $tmp)=tempfile(UNLINK => 1, SUFFIX => $suffix); |