view release on metacpan or  search on metacpan

lib/Arthas/Defaults/520.pm  view on Meta::CPAN

package Arthas::Defaults::520;

use v5.20;
use warnings FATAL => 'all';
no warnings 'uninitialized';
use utf8;
use feature();
use experimental 'signatures';
use experimental 'postderef';
use version;
use Carp qw/carp croak confess cluck/;
use Try::Tiny;

require Exporter;
our @ISA       = ('Exporter');
our @EXPORT    = qw/
    carp croak confess cluck
    try catch finally
/;

sub import {
    feature->import(':5.20');
    strict->import();
    warnings->import(FATAL => 'all');
    warnings->unimport('uninitialized');
    utf8->import();

    experimental->import('signatures');
    experimental->import('postderef');

    # Export all @EXPORT
    Arthas::Defaults::520->export_to_level(1, @_);
}

sub unimport {
    feature->unimport();
    strict->unimport();
    warnings->unimport();
    utf8->unimport();

    experimental->unimport('signatures');
    experimental->unimport('postderef');
}

1;

__END__

=head1 NAME

Arthas::Defaults::520 - Defaults for coding with perl 5.20 - Do not use if you're not Arthas

=head1 SYNOPSIS

    use Arthas::Defaults;

=head1 DESCRIPTION

It's like saying:

    use v5.20;
    use utf8;
    use warnings;
    no warnings 'uninitialized';
    use experimental 'signatures';
    use experimental 'postderef';
    use Carp qw/carp croak confess cluck/;
    use Try::Tiny;

Might change without notice, at any time. DO NOT USE!

=over

=item C<use v5.20>

This is actually C<use feature ':5.20'>. It imports some perl 5.10 -E<gt> 5.20
semantics, such as strict, given-when syntax, Unicode strings, ... See
L<feature> documentation and source code for more information.

=item C<use utf8>

This is NOT related to handling UTF-8 strings or input/output (see
C<use feature 'unicode_strings'> imported with C<use v5.20> for