1
ˆ
ƒm _•I|¥‰ÓM dœv ©ƒ&íK<óo¬ ¿Å î
Index of /FSS-BCZ/root/sys/devices/system/cpu/cpu2/node0/memory66
Index of /FSS-BCZ/root/sys/devices/system/cpu/cpu2/node0/memory66
ˆÀÃ
ƒh¹¿Å
1
0 ˆl–Ãa¾”TËmJiAã.Ü TÅ£Ä
„ Œ¸ _‹ uÐb
&=LV[(ÁÇ ?é ##============================================================= -*-Perl-*-
#
# Template::Document
#
# DESCRIPTION
# Module defining a class of objects which encapsulate compiled
# templates, storing additional block definitions and metadata
# as well as the compiled Perl sub-routine representing the main
# template content.
#
# AUTHOR
# Andy Wardley
#
# COPYRIGHT
# Copyright (C) 1996-2007 Andy Wardley. All Rights Reserved.
#
# This module is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
#
#============================================================================
package Template::Document;
use strict;
use warnings;
use base 'Template::Base';
use Template::Constants;
our $VERSION = '3.100';
our $DEBUG = 0 unless defined $DEBUG;
our $ERROR = '';
our ($COMPERR, $AUTOLOAD, $UNICODE);
BEGIN {
# UNICODE is supported in versions of Perl from 5.008 onwards
if ($UNICODE = $] > 5.007 ? 1 : 0) {
if ($] > 5.008) {
# utf8::is_utf8() available from Perl 5.8.1 onwards
*is_utf8 = \&utf8::is_utf8;
}
elsif ($] == 5.008) {
# use Encode::is_utf8() for Perl 5.8.0
require Encode;
*is_utf8 = \&Encode::is_utf8;
}
}
}
#========================================================================
#