Benign perl Download

Text-Fab 0.07

“A powerful, general-purpose document expansion framework (currently Control Flow, Loops, and Caching are unimplemented {???})”

Perl slurps a filehandleExtension/content classifier disagreement

SHA-25690a58a5a7d8cf25447cc64f5c95b9f7f9037dbcd6a6b4cab50922327924ebf21

URLhttps://cpan.metacpan.org/authors/id/I/IL/ILYAZ/modules/Text-Fab-0.07.tar.gz

MaleculeH(F)Md

Evidence

imports FreezeThaw Fab.pm · lines 1–16

1package Text::Fab;
2
3use 5.022;
4use strict;
5use warnings;
6
7our $VERSION = '0.07';
8
9# FreezeThaw is required because Storable::dclone cannot serialize CODE references
10# stored in the configuration hash (such as custom sorters, parsers, and callbacks).
11use FreezeThaw qw(safeFreeze thaw);
12use FreezeThaw 1.00;			# Bug with repeated CODE (or GLOB) references
13
14sub dclone ($) { (thaw safeFreeze shift)[0] }
15
16# File-closi …

Perl subroutine definition Fab.pm · lines 20–26

20:43… 0;
21our $PRIORITY_FILE_CLOSE_OVERFLOW = -2000.0;
22
23sub priority_for_file_close {
24    my ($self, $dist_from_end) = @_;
⋯2 lines

Perl slurps a filehandle Fab.pm · lines 382–391

56… etected for file '$data'\n";
      }
384
      open my $fh, '<', $data
          or die "E_FILE_READ_ERROR: Cannot read include file '$data': $!\n";
      my $content = do { local $/; <$fh> };
      close $fh;
389
      push @{$self->{include_stack}}, $data;
      $self->{config}{'opened_includes'} = [ @{$self->{ …

imports File::Spec 08-include-and-pipeline.t · lines 1–16

1use strict;
2use warnings;
3use Test::More;
4use Test::Exception;
5use File::Temp qw(tempdir);
6use File::Spec;
7use Text::Fab;
8
9use_ok('Text::Fab');
⋯7 lines

imports strict 09-inheritance-and-embed.t · lines 1–11

1use strict;
2use warnings;
3use Test::More;
4use Test::Exception;
5use Text::Fab;
6
7use_ok('Text::Fab');
⋯4 lines

No evidence locations were recorded for this file. Raw result