/usr/share/perl5/Template/Stash/AutoEscaping/Escaped/YourCode.pm is in libtemplate-stash-autoescaping-perl 0.0303-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 | package Template::Stash::AutoEscaping::Escaped::YourCode;
use strict;
use warnings;
use base qw(Template::Stash::AutoEscaping::Escaped::Base Class::Data::Inheritable);
__PACKAGE__->mk_classdata('escape_method');
sub escape {
my $class = shift;
my $text = shift;
$class->escape_method->($text);
}
1;
=encoding utf8
=head1 NAME
Template::Stash::AutoEscaping::Escaped::YourCode - custom escaping base class
L<Template::Stash::AutoEscaping>. Internal use.
=head1 SYNOPSIS
See L<Template::Stash::AutoEscaping> .
=head1 DESCRIPTION
For internal use.
=head2 Methods
=head2 new
Constructor.
=head2 new_as_escaped
Constructor.
=head2 as_string
Return the string.
=head2 flag
Flags
=head2 escape
Abstract method.
=head2 stop_callback
Clear the callback.
=head2 escape_manually
Internal use.
=head2 concat
Stuff.
=head1 LICENSE
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
=head1 AUTHOR
mala E<lt>cpan@ma.laE<gt> (original author of L<Template::Stash::AutoEscape>)
Shlomi Fish (L<http://www.shlomifish.org/>) added some enhancements and
fixes, while disclaiming all rights, as part of his work for
L<http://reask.com/> and released the result as
C<Template::Stash::AutoEscaping> .
=head1 SEE ALSO
L<Template::Stash::AutoEscaping>
=cut
|