FunctionalPerl

 view release on metacpan or  search on metacpan

.perlfiles  view on Meta::CPAN

lib/PXML/Serialize.pm
lib/PXML/Serialize/t.pm
lib/PXML/Tags.pm
lib/PXML/Util.pm
lib/PXML/XHTML.pm
meta/FunctionalPerl/Dependencies.pm
meta/FunctionalPerl/Dependencies/ChjBin.pm
meta/FunctionalPerl/Indexing.pm
meta/FunctionalPerl/ModuleList.pm
meta/FunctionalPerl/TailExpand.pm
meta/bin/gpg
meta/check-hardcoded-perl
meta/code-reformat
meta/copyrightyearcheck
meta/critic
meta/dependencycheck
meta/find-perl.pl
meta/pre-commit
meta/readin.pl
meta/release
meta/t-check

MANIFEST  view on Meta::CPAN

lib/PXML/Serialize/t.pm
lib/PXML/Tags.pm
lib/PXML/Util.pm
lib/PXML/XHTML.pm
licenses/artistic_license_2.0.md
meta/FunctionalPerl/Dependencies.pm
meta/FunctionalPerl/Dependencies/ChjBin.pm
meta/FunctionalPerl/Indexing.pm
meta/FunctionalPerl/ModuleList.pm
meta/FunctionalPerl/TailExpand.pm
meta/bin/gpg
meta/bisect-modules
meta/check-hardcoded-perl
meta/code-reformat
meta/copyrightyearcheck
meta/critic
meta/dependencycheck
meta/find-perl.pl
meta/install-development-dependencies-on-debian
meta/perlfiles
meta/pre-commit

README.md  view on Meta::CPAN

### From the Git repository

    git clone https://github.com/pflanze/functional-perl.git
    cd functional-perl

    # to get the latest release, which is $FP_COMMITS_DIFFERENCE behind master:
    git checkout -b $FP_VERSION_UNDERSCORES $FP_VERSION

    # to verify the same against MitM attacks:
    gpg --recv-key 04EDB072
    git tag -v $FP_VERSION
    # You'll find various pages in search engines with my fingerprint,
    # or you may find a trust path through one of the signatures on my
    # older key 1FE692DA, that this one is signed with.

The bundled scripts modify the library load path to find the files
locally, thus no installation is necessary. All modules are in the
`lib/` directory, `export PERL5LIB=path/to/functional-perl/lib` is all
that's needed.

SIGNATURE  view on Meta::CPAN

SHA256 43744458f54273f8044246e9f44eb0153d3a606acc1ab120d751ddb8ebfe8e3f lib/PXML/Serialize/t.pm
SHA256 c49032d832d452b8b11b3bb674cfe0054bc83a16d815fe1486bc53141441c154 lib/PXML/Tags.pm
SHA256 38fe1e902d088d27528a0898b241b72e88bfe9a966ec7e2f695f41f3bc522a56 lib/PXML/Util.pm
SHA256 61aa541ffe5feb4a01b8e0dea7a31224e4a62876c91099fb4e563f96a3578f21 lib/PXML/XHTML.pm
SHA256 2e8f32201c5fc443e45e27870098f61bfda6d57ab952bc272da46e00a149e58b licenses/artistic_license_2.0.md
SHA256 0fe01910d9ed71147bd524294f18cc55f496293ddd10fbe5a2df8855671746ff meta/FunctionalPerl/Dependencies.pm
SHA256 3a53d82522e0015ed5d9f10b9e80af4cb2ea7189f694e51b46fa6ec3deedaf88 meta/FunctionalPerl/Dependencies/ChjBin.pm
SHA256 f315f095b284b1e8d5ddfda5ec5169ab543072de07f407bd0a129822c78be3b2 meta/FunctionalPerl/Indexing.pm
SHA256 ce87111aafa7029d372a5ed9b5647d7968ce16192696c8e3d8d1c650c709d543 meta/FunctionalPerl/ModuleList.pm
SHA256 8a43a5e70083d377c959eeee8ffa32225c6c60b2bd2b5f25ca18f5763440160f meta/FunctionalPerl/TailExpand.pm
SHA256 4db695f9561d8c44a4425b3c3e785c1b267d78aa22b4b7ba74ea7698ccfff45f meta/bin/gpg
SHA256 0cda077c6b531ce5a7381935dff8ba76657e056b3c1adcce394b33a97f8b4cd8 meta/bisect-modules
SHA256 e2c6be92935a4aa66a32b712c431963d05ea5ad9f88e8ec55601f6b7a7cde80c meta/check-hardcoded-perl
SHA256 c8a9bb460e5da43aaa7c9c3e59d5bcfce8c4e0f0979c539a195c9cbf7e7657d0 meta/code-reformat
SHA256 f238b1f48d595b987339bfbbe3d919614afe8b9460a8ecd1bdde5607f2134aeb meta/copyrightyearcheck
SHA256 6a9c378a2a0c0d4a24e6d9eb8206c7b0d882f5163bc29e861edebd5e35ba98c3 meta/critic
SHA256 d474d3805c6b253251485f789ab9a4668159e45084baa82a007b00ab38f6cb76 meta/dependencycheck
SHA256 8dcaf544e0ca47a2b55cc8953d0ec5e7c8397b762c8d3a894121e845a1d404ea meta/find-perl.pl
SHA256 7d6383ab81e77dafbe74dba992fe8eb2f421dacb7fd4ccd251860771726f04a0 meta/install-development-dependencies-on-debian
SHA256 96eaee4e8c63b7b95ee9bf2b2022ce2cd5ae4b38157b70d12d2c5fc47966c9f3 meta/perlfiles
SHA256 437197fcb671faf15013f3b3c913a37930a3a58a0622ade731c9ff5dcb56907e meta/pre-commit

htmlgen/FunctionalPerl/Htmlgen/Sourcelang.pm  view on Meta::CPAN

    $perl += 1 if $str =~ /\$VAR\d+\b/;
    $perl += 1 if $str =~ /(?:perlrepl|fperl)(?: *\d+)?>.*\bF\b/;
    $perl += 1 if $str =~ /\blazy\s*\{/;
    $perl += 1
        if $str =~ /\bnot \$/;    # shell doesn't have "not"; except if custom
    $perl += 1 if $str =~ /\}\s*elsif\s*\{/;
    $perl += 1 if $str =~ /\bexists\s*\$\w+\s*\{/;
    $perl += 1 if $str =~ /\bcons\s*\$/;

    $sh += 2
        if $str =~ m{(?:^|\n)\s*(?:[#\$]\s*)?(?:git |gpg |ls |chmod |cd |\./)};

    # Want repl sessions to be non highlighted? Do I ?
    $sh += 10 if $str =~ m{(?:^|\n) *main> };

    ($perl >= 1 and $perl > $sh) ? "Perl" : "shell"
}

use Chj::TEST;
use FP::List;
use FP::Either ":all";

meta/bin/gpg  view on Meta::CPAN

}

use lib "$mydir/../../lib";
use FP::Equal;
use Chj::xperlfunc qw(xexec xprint xprintln);    #  xgetfile_utf8
use Chj::xIOUtil qw(xputfile_bytes);             # XX move to ^ ?
use FP::Repl;
use Chj::singlequote qw(singlequote_many);
use POSIX 'getcwd';

my $orig_gpg = "/usr/bin/gpg";

my $siginput_path  = "$mydir/../../SIGNATURE-input";
my $sigoutput_path = getcwd . "/SIGNATURE.tmp";

if (   equal(\@ARGV, ["--version"])
    or equal(\@ARGV, ['--batch', '--verify', 'SIGNATURE']))
{
    xexec $orig_gpg, @ARGV;
} elsif (@ARGV and $ARGV[0] eq "--clearsign") {
    my $in = do {
        local $/;
        <STDIN>
    };
    close STDIN or die "stdin: $!";
    xputfile_bytes $siginput_path, $in;
    open STDOUT, ">", "/dev/tty" or die $!;
    xprintln "our call was:" . singlequote_many(@ARGV);
    xprintln "please run:";
    xprintln " gpg @ARGV < $siginput_path > $sigoutput_path";
    xprintln "then ctl-d here.";
    repl;
    unlink $siginput_path;

    # xprint xgetfile_utf8 $sigoutput_path;
    # unlink $sigoutput_path;
    # ^ not working somehow, huh. Thus use the output path that
    #   Module::Signature uses and write to it directly above.
} else {
    open STDERR, ">", "/dev/tty" or die $!;