App-sitelenmute

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

      },
      "runtime" : {
         "requires" : {
            "Encode::Locale" : "0",
            "File::Copy::Recursive" : "0",
            "File::ShareDir" : "0",
            "File::Slurper" : "0",
            "File::Symlink::Relative" : "0",
            "Image::ExifTool" : "0",
            "JSON::Tiny" : "0",
            "Modern::Perl" : "1.20180701",
            "Time::Progress" : "0",
            "perl" : "5.026000"
         }
      },
      "test" : {
         "requires" : {
            "File::SearchPath" : "0",
            "Mojo::DOM58" : "0"
         }
      }

META.yml  view on Meta::CPAN

    - t
    - inc
requires:
  Encode::Locale: '0'
  File::Copy::Recursive: '0'
  File::ShareDir: '0'
  File::Slurper: '0'
  File::Symlink::Relative: '0'
  Image::ExifTool: '0'
  JSON::Tiny: '0'
  Modern::Perl: '1.20180701'
  Time::Progress: '0'
  perl: '5.026000'
resources:
  repository: https://src.alexschroeder.ch/sitelen-mute.git
version: 3.04
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

Makefile.PL  view on Meta::CPAN

install_share 'share';

# os_unsupported if $^O eq 'MSWin32';

WriteMakefile(
  NAME             => 'App::sitelenmute',
  VERSION_FROM     => 'lib/App/sitelenmute.pm',
  ABSTRACT_FROM    => 'lib/App/sitelenmute.pm',
  AUTHOR           => 'Alex Schroeder',
  LICENSE          => 'gpl_3',
  MIN_PERL_VERSION => '5.26.0', # Modern::Perl '2018'
  EXE_FILES        => [
    'script/sitelen-mute',
    'script/fcaption',
  ],
  PREREQ_PM => {
    'Modern::Perl' => 1.20180701, # for '2018'
    'Encode::Locale' => 0,
    'File::Copy::Recursive' => 0,
    'File::Slurper' => 0,
    'File::ShareDir' => 0,
    'File::Symlink::Relative' => 0,
    'Image::ExifTool' => 0,
    'JSON::Tiny' => 0,
    'Time::Progress' => 0,
  },
  CONFIGURE_REQUIRES => {

script/sitelen-mute  view on Meta::CPAN

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 <http://www.gnu.org/licenses/>.

=cut

use Modern::Perl '2018';
use open ':std', ':encoding(utf8)';
use utf8;

our $VERSION = "3.0.0";

use Digest::SHA;
use Encode qw(decode decode_utf8 encode_utf8);
use Encode::Locale;
use File::Basename qw(fileparse);
use File::Copy::Recursive qw(dircopy);

t/album.t  view on Meta::CPAN

# 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 <http://www.gnu.org/licenses/>.

use utf8;
# apply before loading Test::More
use open ':std', ':encoding(utf8)';
use Test::More;
use Modern::Perl;
use Config;
use File::Copy;
use File::Copy::Recursive qw(dircopy);
use File::Path qw(remove_tree);
use File::SearchPath qw(searchpath);
use File::Slurper qw(read_text read_binary);
use File::Spec::Functions qw(catfile);
use JSON::Tiny qw(decode_json);
use Mojo::DOM58;