- Sort Score
- Result 10 results
- Languages All
- Labels All
Results 1 - 10 of 75 for content_length:[0 TO 9999] (0.1 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: Sun Dec 14 02:37:25 UTC 2025 - 8.5K 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: Sun Dec 14 00:48:32 UTC 2025 - 3.1K 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: Sun Dec 14 00:54:17 UTC 2025 - 2.1K bytes - Viewed (0) -
B::Terse.txt
package B::Terse; our $VERSION = '1.09'; use strict; use B qw(class @specialsv_name); use B::Concise qw(concise_subref set_style_standard); use Carp; sub terse { my ($order, $subref) = @_; set_styl...perldoc.perl.org/B::Terse.txtRegistered: Sun Dec 14 19:55:28 UTC 2025 - 2.8K bytes - Viewed (0) -
sort.txt
package sort; use strict; use warnings; our $VERSION = '2.06'; sub import { shift; if (@_ == 0) { require Carp; Carp::croak("sort pragma requires arguments"); } $^H{sort} //= 0; for my $subpragma (...perldoc.perl.org/sort.txtRegistered: Sun Dec 14 22:56:14 UTC 2025 - 3K bytes - Viewed (0) -
source::encoding.txt
package source::encoding; use v5.40; our $VERSION = '0.01'; our $ascii_hint_bits = 0x00000010; sub import { unimport(); # Get rid of any 'use utf8' my (undef, $arg) = @_; if ($arg eq 'utf8') { requ...perldoc.perl.org/source::encoding.txtRegistered: Sun Dec 14 19:42:15 UTC 2025 - 1.7K bytes - Viewed (0) -
Encode::KR::2022_KR.txt
package Encode::KR::2022_KR; use strict; use warnings; our $VERSION = do { my @r = ( q$Revision: 2.4 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r }; use Encode qw(:fallbacks); use parent qw(Enco...perldoc.perl.org/Encode::KR::2022_KR.txtRegistered: Sun Dec 14 23:56:51 UTC 2025 - 1.9K bytes - Viewed (0) -
Config::Extensions.txt
package Config::Extensions; use strict; our (%Extensions, $VERSION, @ISA, @EXPORT_OK); use Config; require Exporter; $VERSION = '0.03'; @ISA = 'Exporter'; @EXPORT_OK = '%Extensions'; foreach my $ty...perldoc.perl.org/Config::Extensions.txtRegistered: Sun Dec 14 23:49:22 UTC 2025 - 1.3K bytes - Viewed (0) -
ok.txt
package ok; our $VERSION = '1.302210'; 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: Mon Dec 15 01:14:38 UTC 2025 - 971 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: Sun Dec 14 07:06:21 UTC 2025 - 8.9K bytes - Viewed (0)