diff options
| author | Jacob Pipkin <j@dawnrazor.net> | 2012-10-04 05:05:52 -0500 |
|---|---|---|
| committer | Jacob Pipkin <j@dawnrazor.net> | 2012-10-04 05:05:52 -0500 |
| commit | 62405748ab1470aac11811167c001ce7cbeb040a (patch) | |
| tree | 404c1fd7db4a1e3bab5916e9d5afa85be331332f /sboclean | |
| parent | bf6b66358659cf0e49d207ea4286b4153a1e6610 (diff) | |
| download | sbotools2-62405748ab1470aac11811167c001ce7cbeb040a.tar.xz | |
removed 'date:' line from comments, cleanups for quote consistency, etc
Diffstat (limited to 'sboclean')
| -rwxr-xr-x | sboclean | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -6,7 +6,6 @@ # script to clean stuff left around from sbotools. # # author: Jacob Pipkin <j@dawnrazor.net> -# date: Boomtime, the 6th day of Confusion in the YOLD 3178 # license: WTFPL <http://sam.zoy.org/wtfpl/COPYING> use 5.16.0; @@ -48,12 +47,11 @@ GetOptions ( 'interactive|i' => \$interactive, ); -show_usage && exit 0 if $help; -show_version && exit 0 if $vers; +show_usage and exit 0 if $help; +show_version and exit 0 if $vers; -unless ($clean_dist || $clean_work) { - show_usage, die "You must specify at least one of -d or -w.\n"; -} +show_usage, die "You must specify at least one of -d or -w.\n" unless + ($clean_dist || $clean_work); sub remove_stuff ($) { exists $_[0] or script_error 'remove_stuff requires an argument'; |
