diff options
Diffstat (limited to 'SBO-Lib/lib/SBO/App.pm')
-rwxr-xr-x | SBO-Lib/lib/SBO/App.pm | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/SBO-Lib/lib/SBO/App.pm b/SBO-Lib/lib/SBO/App.pm new file mode 100755 index 0000000..7033d93 --- /dev/null +++ b/SBO-Lib/lib/SBO/App.pm @@ -0,0 +1,24 @@ +package SBO::App::Remove; + +# vim: ts=2:et +# +# authors: Luke Williams <xocel@iquidus.org> +# Jacob Pipkin <j@dawnrazor.net> +# Andreas Guldstrand <andreas.guldstrand@gmail.com> +# license: WTFPL <http://sam.zoy.org/wtfpl/COPYING> + +use 5.16.0; +use strict; +use warnings FATAL => 'all'; +use File::Basename; + +sub new { + my $class = shift; + + my $self = _parse_opts(@_); + $self->{fname} = basename( (caller(0))[1] ); + + return bless $self, $class; +} + +1; |