summaryrefslogtreecommitdiff
path: root/bin/raps2
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2011-05-20 14:54:15 +0200
committerDaniel Friesel <derf@finalrewind.org>2011-05-20 14:54:15 +0200
commit5b375768101d93054d42f9326f010d6f8019f541 (patch)
tree131be86ad1466890e7f884dbdbc0d9903fdc961f /bin/raps2
parentcafd103a950682711fdc9e155d73da7f2fc59caa (diff)
Syntax cleanup
Diffstat (limited to 'bin/raps2')
-rwxr-xr-xbin/raps222
1 files changed, 13 insertions, 9 deletions
diff --git a/bin/raps2 b/bin/raps2
index 71ccbea..27dcdbc 100755
--- a/bin/raps2
+++ b/bin/raps2
@@ -9,21 +9,21 @@ use 5.010;
use App::Raps2;
my $raps2 = App::Raps2->new();
-my ($action, @args) = @ARGV;
+my ( $action, @args ) = @ARGV;
-my $VERSION = '0.3';
+our $VERSION = '0.3';
$raps2->sanity_check();
$raps2->load_config();
given ($action) {
- when ('add') { $raps2->cmd_add(@args) }
- when ('del') { $raps2->cmd_remove(@args) }
- when ('dump') { $raps2->cmd_dump(@args) }
- when ('edit') { $raps2->cmd_edit(@args) }
- when ('get') { $raps2->cmd_get(@args) }
- when ('info') { $raps2->cmd_info(@args) }
- when ('list') { $raps2->cmd_list(@args) }
+ when ('add') { $raps2->cmd_add(@args) }
+ when ('del') { $raps2->cmd_remove(@args) }
+ when ('dump') { $raps2->cmd_dump(@args) }
+ when ('edit') { $raps2->cmd_edit(@args) }
+ when ('get') { $raps2->cmd_get(@args) }
+ when ('info') { $raps2->cmd_info(@args) }
+ when ('list') { $raps2->cmd_list(@args) }
when ('version') { say "raps2 version ${VERSION}" }
}
@@ -92,6 +92,10 @@ List all saved accounts with their respective Logins and URLs
=back
+=head1 OPTIONS
+
+None.
+
=head1 EXIT STATUS
zero on success, non-zero otherwise.