From 762dc8f55fc8c202a67c6faf792a6e951dafc5ea Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 19 Feb 2011 10:00:20 +0100 Subject: Add raps2 list --- bin/raps2 | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/bin/raps2 b/bin/raps2 index 8e65546..53ae87b 100755 --- a/bin/raps2 +++ b/bin/raps2 @@ -130,6 +130,16 @@ sub cmd_info { return; } +sub cmd_list { + opendir(my $dh, get_xdg_data_file()); + my @entries = grep { /^[^.]/ } readdir($dh); + closedir($dh); + + for my $file (sort @entries) { + say $file; + } +} + sub create_dot_dirs { make_path(get_xdg_config_file()); make_path(get_xdg_data_file()); @@ -319,6 +329,7 @@ given ($action) { when ('dump') { cmd_dump(@args) } when ('get') { cmd_get(@args) } when ('info') { cmd_info(@args) } + when ('list') { cmd_list(@args) } } __END__ -- cgit v1.2.3