- Sort Score
- Result 10 results
- Languages All
- Labels All
Results 1 - 10 of 790 for label:perl (0.01 sec)
-
sigtrap.txt
package sigtrap; =head1 NAME sigtrap - Perl pragma to enable simple signal handling =cut use Carp; $VERSION = '1.10'; $Verbose ||= 0; sub import { my $pkg = shift; my $handler = \&handler_traceback...perldoc.perl.org/sigtrap.txtRegistered: Fri Apr 26 14:35:37 UTC 2024 - 8.5K bytes - Viewed (0) -
ok.txt
package ok; our $VERSION = '1.302194'; use strict; use Test::More (); sub import { shift; if (@_) { goto &Test::More::pass if $_[0] eq 'ok'; goto &Test::More::use_ok; } # No argument list - croak a...perldoc.perl.org/ok.txtRegistered: Fri Apr 26 14:28:12 UTC 2024 - 967 bytes - Viewed (2) -
strict.txt
package strict; $strict::VERSION = "1.12"; my ( %bitmask, %explicit_bitmask ); BEGIN { # Verify that we're called correctly so that strictures will work. # Can't use Carp, since Carp uses us! # see...perldoc.perl.org/strict.txtRegistered: Fri Apr 26 17:44:00 UTC 2024 - 4.7K bytes - Viewed (0) -
deprecate.txt
package deprecate; use strict; use warnings; our $VERSION = 0.04; # our %Config can ignore %Config::Config, e.g. for testing our %Config; unless (%Config) { require Config; *Config = \%Config::Conf...perldoc.perl.org/deprecate.txtRegistered: Fri Apr 26 16:17:36 UTC 2024 - 4.5K bytes - Viewed (0) -
filetest.txt
package filetest; our $VERSION = '1.03'; =head1 NAME filetest - Perl pragma to control the filetest permission operators =head1 SYNOPSIS $can_perhaps_read = -r "file"; # use the mode bits { use fil...perldoc.perl.org/filetest.txtRegistered: Fri Apr 26 18:45:50 UTC 2024 - 3.9K bytes - Viewed (0) -
sort.txt
package sort; use strict; use warnings; our $VERSION = '2.05'; sub import { shift; if (@_ == 0) { require Carp; Carp::croak("sort pragma requires arguments"); } $^H{sort} //= 0; for my $subpragma (...perldoc.perl.org/sort.txtRegistered: Fri Apr 26 17:39:20 UTC 2024 - 2.9K bytes - Viewed (0) -
CPAN::Meta::Merge.txt
use strict; use warnings; package CPAN::Meta::Merge; our $VERSION = '2.150010'; use Carp qw/croak/; use Scalar::Util qw/blessed/; use CPAN::Meta::Converter 2.141170; sub _is_identical { my ($left, ...perldoc.perl.org/CPAN::Meta::Merge.txtRegistered: Fri Apr 26 22:19:58 UTC 2024 - 8.9K bytes - Viewed (0) -
CORE.txt
=head1 NAME CORE - Namespace for Perl's core routines =head1 SYNOPSIS BEGIN { *CORE::GLOBAL::hex = sub { 1; }; } print hex("0x50"),"\n"; # prints 1 print CORE::hex("0x50"),"\n"; # prints 80 CORE::s...perldoc.perl.org/CORE.txtRegistered: Sat Apr 27 00:17:22 UTC 2024 - 3.1K bytes - Viewed (0) -
AnyDBM_File.txt
package AnyDBM_File; use warnings; use strict; use 5.006_001; our $VERSION = '1.01'; our @ISA = qw(NDBM_File DB_File GDBM_File SDBM_File ODBM_File) unless @ISA; my $mod; for $mod (@ISA) { if (eval ...perldoc.perl.org/AnyDBM_File.txtRegistered: Fri Apr 26 21:42:53 UTC 2024 - 2.6K bytes - Viewed (0) -
CPAN::Debug.txt
# -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*- package CPAN::Debug; use strict; use vars qw($VERSION); $VERSION = "5.5001"; # module is internal to CPAN.pm %CPAN::DEBUG = qw[ CPAN 1 In...perldoc.perl.org/CPAN::Debug.txtRegistered: Fri Apr 26 21:19:47 UTC 2024 - 2.1K bytes - Viewed (0)