Benign perl Download

Text-Fab 0.02

“A powerful, general-purpose document expansion framework (currently exists mostly as uncomplete documentation and a beginning of a stub of…”

Perl slurps a filehandleLow identifier reuse ratio

SHA-25667415b4fdedb69a9c451b357f04c4543a01e933d25b696894af266559df663e6

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

MaleculeH(F)Md

Evidence

Perl sigil variable declaration Fab.pm · lines 1–10

1package Text::Fab;
2
3use 5.022;
4use strict;
5use warnings;
6
7our $VERSION = '0.02';
8
9#use Storable 'dclone'; # For group snapshots (does not support CODE references in data!)
10use FreezeThaw qw(safeFreeze thaw); …

Perl subroutine definition Fab.pm · lines 12–19

12:28… Freeze shift)[0] }
13
14# --- Default Callbacks ---
15
16sub _default_interleaver {
⋯3 lines

Perl slurps a filehandle Fab.pm · lines 230–240

56… etected for file '$data'\n";
      }
232
      open my $fh, '<', $data
          or die "E_FILE_READ_ERROR: Cannot read include file '$data': $!\n";
      my $content = do { local $/; <$fh> };
      close $fh;
237
      push @{$self->{include_stack}}, $data;
      eval {
          $self->process_string($content …

English function-word token "with" Fab.pm · lines 597–602

597:6…    die "E_DANGLING_END_GROUP: #end_group called with no open group\n";
598    }
599
600    my $top = pop @{$self->{group_stack}};
601
602    if (defined $flavor) { …

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