view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
src/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
src/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
src/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
src/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/Encode/Guess/Educated.pm view on Meta::CPAN
########################################################################
########################################################################
# Class initializers
UNITCHECK {
####################################
# Incidence of non-ASCII code points in PubMed Open Access as of December 2010.
#
# Table is UCA sorted and formatted using the dump_training_data
view release on metacpan or search on metacpan
lib/English/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/EntityModel/Class.pm view on Meta::CPAN
}
}
# Thanks to Check::UnitCheck
Check::UnitCheck::unitcheckify(sub {
# FIXME Can't call any log functions within UNITCHECK
local $::DISABLE_LOG = 1;
my %ml = %methodList;
$class->add_method($pkg, $_, $ml{$_}) foreach keys %ml;
$class->add_method($pkg, 'import', sub { }) unless $pkg->can('import');
}) if %methodList;
view release on metacpan or search on metacpan
lib/EntityModel/Log.pm view on Meta::CPAN
with L<EntityModel> only, if you're looking for a general logging framework try one of the
other options in the L</SEE ALSO> section.
=cut
# Need to be able to switch off logging in UNITCHECK stages, since that segfaults perl5.10.1 and possibly other versions
our $DISABLE = 0;
use Time::HiRes qw{time};
use POSIX qw{strftime};
use Exporter;
view release on metacpan or search on metacpan
0.005 2011-02-12 16:01:19 Europe/London
Fix dependencies and minor test cleanups.
0.004 2011-02-06 06:02:05 Europe/London
Add remaining dependencies, including EntityModel::Class 0.002 which provides a UNITCHECK fix for
non-multiplicity-enabled perl versions.
0.003 2011-02-06 02:46:11 Europe/London
Add missing XML::XPath dependency
Copy across the missing update support for EntityModel::Query.
Allow fields that don't have an EntityModel::Field definition (and corresponding type).
Initial support for callback events on entities at EntityModel::Support::Perl level.
Fix some pod doc headers.
Do EntityModel load in general.t inside a BEGIN block in an attempt to trace why usemultiplicity
seems to be required for UNITCHECK blocks to work as required.
0.001 2011-02-01 04:38:41 Europe/London
Preliminary release to CPAN.
view release on metacpan or search on metacpan
lib/Exporter/Auto.pm view on Meta::CPAN
unshift @{"${klass}::ISA"}, 'Exporter';
on_scope_end {
my %hash = %{"${klass}::"};
while (my ($k, $v) = each %hash) {
next if $k =~ /^(?:BEGIN|CHECK|END|INIT|UNITCHECK)$/;
next if $k =~ /^_/;
next unless *{"${klass}::${k}"}{CODE};
next if $klass ne stash_name($klass->can($k));
push @{"${klass}::EXPORT"}, $k;
}
view release on metacpan or search on metacpan
lib/ExtUtils/ParseXS/Node.pm view on Meta::CPAN
| /* End of Initialisation Section */
|
EOF
}
# Emit code to call any UNITCHECK blocks and return true.
# Since 5.22, this is been put into a separate function.
print $self->Q(<<"EOF");
|#if PERL_VERSION_LE(5, 21, 5)
|# if PERL_VERSION_GE(5, 9, 0)
view release on metacpan or search on metacpan
lib/Extism/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
include/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/Farabi/files/public/assets/perlito/perlito5.min.js view on Meta::CPAN
else{return(err);}}
return r;})(p5want)));if(p5bool(p5pkg["main"]["v_@"])){p5pkg["main"]["Hash_INC"].p5hset(p5str(v_filename),(null));return(p5pkg["Perlito5::Grammar::Use"].die([[p5pkg["main"]["v_@"]]],p5want));}
else{if(!(p5bool(v_result))){(delete p5pkg["main"]["Hash_INC"].p5hget(p5str(v_filename)));if(p5bool(p5pkg["main"]["v_@"])){p5pkg["Perlito5::Grammar::Use"].warn([[p5pkg["main"]["v_@"]]],null);};return(p5pkg["Perlito5::Grammar::Use"].die([[(p5str(v_fil...
else{throw(p5context([v_result],p5want))}}}
catch(err){if(err instanceof Error){throw(err);}
else{return(err);}}});1;})();(function(){var p5155=p5make_package("Perlito5::Grammar::Block");;;(p5pkg["Perlito5::Grammar::Block"]["Hash_Named_block"]={'BEGIN':1,'UNITCHECK':1,'CHECK':1,'INIT':1,'END':1});p5pkg["Perlito5::Expression"].add_statement([...
else{p5pkg["Perlito5::Grammar::Block"].die([['syntax error']],null);};p5pkg["Perlito5::Grammar::Block"].warn([['continue!']],null);(v_continue||(v_continue=new p5HashRef({})))._hash_.p5hset('stmts',((v_cont||(v_cont=new p5HashRef({})))._hash_.p5hget_...
else{(v_v=(p5pkg["Perlito5::Expression"].block_or_hash([v_v],0)));};if((p5str(p5pkg["Perlito5::Grammar::Block"].ref([v_v],0))=='Perlito5::AST::Lit::Block')){if((p5str(v_block_name)=='BEGIN')){(function(p5want){var r;p5pkg["main"]["v_@"]="";try{r=eval...
catch(err){if(err instanceof p5_error||err instanceof Error){p5pkg["main"]["v_@"]=err;try{p5pkg["main"]["v_@"]=p5pkg["main"]["v_@"]+"\n"+err.stack;}
catch(err){}}
else{return(err);}}
view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/File/Copy/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
KEY_truncate|5.003007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/File/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/File/PackageIndexer.pm view on Meta::CPAN
$finder = sub {
return(0) unless $_[1]->isa("PPI::Statement");
my $statement = $_[1];
my $class = $statement->class;
# BEGIN/CHECK/INIT/UNITCHECK/END:
# Recurse and set the block state, then break outer
# recursion so we don't process twice
if ( $class eq 'PPI::Statement::Scheduled' ) {
my $temp_copy = $in_scheduled_block;
$in_scheduled_block = $statement->type;
view release on metacpan or search on metacpan
include/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
easyxs/ppport.h view on Meta::CPAN
KEY_try|5.033007||Viu
KEY_uc|5.003007||Viu
KEY_ucfirst|5.003007||Viu
KEY_umask|5.003007||Viu
KEY_undef|5.003007||Viu
KEY_UNITCHECK|5.009005||Viu
KEY_unless|5.003007||Viu
KEY_unlink|5.003007||Viu
KEY_unpack|5.003007||Viu
KEY_unshift|5.003007||Viu
KEY_untie|5.003007||Viu
view release on metacpan or search on metacpan
lib/FindApp/Object/Class.pm view on Meta::CPAN
my $old = $self->old;
$new->copy($old);
$self->old($new);
}
## UNITCHECK { __PACKAGE__->renew } # stash new singleton
# Return singleton, making one as needed.
# Stash the argument as the new singleton.
sub old { &ENTER_TRACE;
my($self, $new) = @_;
view release on metacpan or search on metacpan
lib/Fred/Fish/DBUG/ON.pm view on Meta::CPAN
# Do we need to know who called ${func} at this time ???
my $line="";
if ( $dbug_global_vars{who_called} && $func ne $dbug_global_vars{main} ) {
# Special functions where there are no valid callers ...
if ( $eval_flg || $func =~ m/::END$/ || $func =~ m/::BEGIN$/ ||
$func =~ m/::UNITCHECK$/ || $func =~ m/::CHECK$/ || $func =~ m/::INIT$/ ||
$func =~ m/::DESTROY$/ ) {
$line = _dbug_called_by (0, 0, 0);
# When Try::Tiny renames the __ANON__ function to ... "YourModule::xxx {...}"
# It doesn't always do this ...
view release on metacpan or search on metacpan
lib/Fukurama/Class/Tree.pm view on Meta::CPAN
unimport => 1,
can => 1,
isa => 1,
VERSION => 1,
BEGIN => 1,
UNITCHECK => 1,
CHECK => 1,
INIT => 1,
END => 1,
DESTROY => 1,
AUTOLOAD => 1,
view release on metacpan or search on metacpan
Parameters.xs view on Meta::CPAN
if (
sv_eq_pvs(saw_name, "BEGIN") ||
sv_eq_pvs(saw_name, "END") ||
sv_eq_pvs(saw_name, "INIT") ||
sv_eq_pvs(saw_name, "CHECK") ||
sv_eq_pvs(saw_name, "UNITCHECK")
) {
builtin_attrs |= MY_ATTR_SPECIAL;
}
lex_read_space(0);