add LICENSE and remove unused/unneeded modules

1 files changed, 13 insertions, 4 deletions

diff --git a/neocitiesfs.pl b/neocitiesfs.pl
index 4b93693..0ee4e78 100755
--- a/neocitiesfs.pl
+++ b/neocitiesfs.pl
@@ -1,19 +1,28 @@
 #!/usr/bin/perl -w
+# This program is free software: you can redistribute it and/or modify it under the terms of
+# the GNU General Public License as published by the Free Software Foundation, either version
+# 3 of the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; 
+# without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 
+# See the GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along with this program.
+# If not, see <https://www.gnu.org/licenses/>.
+# author: jake [a\ jakes-mail dot top
+# release: 29, Oct 2023 
 use strict;
 use warnings;
 use 5.010;
 use Mojo::UserAgent;
 use JSON;
-use Data::Dumper;
 use Fuse qw(fuse_get_context);
 use POSIX qw(ENOENT EISDIR EINVAL EEXIST ENOTEMPTY EACCES EFBIG 
 	EPERM EBADF ENOSPC EMFILE ENOSYS);
-use Smart::Comments;
 use File::Slurper qw(read_text);
 use Mojo::Date;
-use Carp::Always;
-
 use Getopt::Long;
+
 my $user;
 my $pass;
 my $api;