From 60646a528571a8703a95974f229ffefb11a99872 Mon Sep 17 00:00:00 2001 From: jake Date: Sun, 29 Oct 2023 21:44:39 -0400 Subject: add LICENSE and remove unused/unneeded modules --- neocitiesfs.pl | 17 +++++++++++++---- 1 file changed, 13 insertions(+), 4 deletions(-) (limited to 'neocitiesfs.pl') 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 . +# 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; -- cgit v1.2.3