1 files changed, 21 insertions, 5 deletions
diff --git a/lib/App/BorgRestore.pm b/lib/App/BorgRestore.pm
index 6e92c1c..746dffc 100644
--- a/lib/App/BorgRestore.pm
+++ b/lib/App/BorgRestore.pm
@@ -5,11 +5,7 @@ use warnings;
 
 our $VERSION = "2.0.0";
 
-
-
-1;
-__END__
-
+=pod
 =encoding utf-8
 
 =head1 NAME
@@ -49,3 +45,23 @@ Florian Pritz E<lt>bluewind@xinu.atE<gt>
 
 =cut
 
+sub new {
+	my $class = shift;
+	my $opts = shift;
+
+	my $self = {};
+	bless $self, $class;
+
+	$self->{opts} = $opts;
+
+	return $self;
+}
+
+sub debug {
+	my $self = shift;
+	say STDERR @_ if $self->{opts}->{debug};
+}
+
+
+1;
+__END__