diff options
author | B. Watson <yalhcru@gmail.com> | 2015-04-07 21:20:57 -0400 |
---|---|---|
committer | B. Watson <yalhcru@gmail.com> | 2015-04-07 21:20:57 -0400 |
commit | c09112454417693693c265963b1f829695611b2d (patch) | |
tree | 426da9cfcdab7a038187b8f3ecfc19dc05879d15 /sbofixinfo | |
parent | 5ac143ee2f384049ed0f299dc030963216fb226e (diff) | |
download | sbostuff-c09112454417693693c265963b1f829695611b2d.tar.gz |
add --help option for sbofixinfo
Diffstat (limited to 'sbofixinfo')
-rwxr-xr-x | sbofixinfo | 9 |
1 files changed, 8 insertions, 1 deletions
@@ -111,7 +111,14 @@ B<sbolint>(1), B<sbosearch>(1) PRGNAM VERSION HOMEPAGE DOWNLOAD MD5SUM DOWNLOAD_x86_64 MD5SUM_x86_64 REQUIRES MAINTAINER EMAIL /; -die "$SELF v$VERSION\nUsage: $SELF [-b] infofile <infofile ...>\n" unless @ARGV; +die "$SELF v$VERSION\nUsage: $SELF [--help] [-b] infofile <infofile ...>\n" unless @ARGV; + +if($ARGV[0] eq '--help') { + no warnings; + require FindBin; + system("perldoc $FindBin::RealScript"); + exit 0; +} if($ARGV[0] eq '-b') { $backup = 1; |