view release on metacpan or search on metacpan
lib/CPAN/Uploader.pm view on Meta::CPAN
if (not defined $response) {
die "Request completely failed - we got undef back: $!";
}
if (!$response->success) {
if ($response->status eq '404') {
die $self->target, "'s CGI for handling messages seems to have moved!\n",
"(HTTP response code of 404 from the ", $self->target, " web server)\n",
"It used to be: ", $uri, "\n",
"Please inform the maintainer of @{[__PACKAGE__]}.\n";
} else {
die "request failed with error code ", $response->status,
"\n Message: ", $response->reason, "\n";
view all matches for this distribution
view release on metacpan or search on metacpan
t/original/align.t view on Meta::CPAN
my $str = "\100" x 20;
substr($str, 0, 1) = ""; # chopping off first char makes the string unaligned
#use Devel::Peek; Dump($str);
print "not " unless md5_hex($str) eq "c7ebb510e59ee96f404f288d14cc656a";
print "ok 1\n";
view all matches for this distribution
view release on metacpan or search on metacpan
Revision history for Alt-FFI-Raw-Platypus
0.04 2021-04-29 21:00:36 -0600
- Moved to new GitHub org PerlFFI. Additionally the repository link used to
be wrong and would 404 in older versions.
0.03 2019-02-16 18:21:10 -0500
- Fix configure prereqs
0.02 2019-02-16 09:35:12 -0500
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Capture/Tiny.pm view on Meta::CPAN
}
# restore prior filehandles and shut down tees
# _debug( "# restoring filehandles ...\n" );
_open_std( $stash->{old} );
_close( $_ ) for values %{$stash->{old}}; # don't leak fds
# shouldn't need relayering originals, but see rt.perl.org #114404
_relayer(\*STDOUT, $layers{stdout}) if $do_stdout;
_relayer(\*STDERR, $layers{stderr}) if $do_stderr;
_unproxy( %proxy_std );
# _debug( "# killing tee subprocesses ...\n" ) if $do_tee;
_kill_tees( $stash ) if $do_tee;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Alvis/Document/Encoding.pm view on Meta::CPAN
55366=>1, 55367=>1, 55368=>1, 55369=>1, 55370=>1, 55371=>1, 55372=>1,
55373=>1, 55374=>1, 55375=>1, 55376=>1, 55377=>1, 55378=>1, 55379=>1,
55380=>1, 55381=>1, 55382=>1, 55383=>1, 55384=>1, 55385=>1, 55386=>1,
55387=>1, 55388=>1, 55389=>1, 55390=>1, 55391=>1, 55392=>1, 55393=>1,
55394=>1, 55395=>1, 55396=>1, 55397=>1, 55398=>1, 55399=>1, 55400=>1,
55401=>1, 55402=>1, 55403=>1, 55404=>1, 55405=>1, 55406=>1, 55407=>1,
55408=>1, 55409=>1, 55410=>1, 55411=>1, 55412=>1, 55413=>1, 55414=>1,
55415=>1, 55416=>1, 55417=>1, 55418=>1, 55419=>1, 55420=>1, 55421=>1,
55422=>1, 55423=>1, 55424=>1, 55425=>1, 55426=>1, 55427=>1, 55428=>1,
55429=>1, 55430=>1, 55431=>1, 55432=>1, 55433=>1, 55434=>1, 55435=>1,
55436=>1, 55437=>1, 55438=>1, 55439=>1, 55440=>1, 55441=>1, 55442=>1,
lib/Alvis/Document/Encoding.pm view on Meta::CPAN
56367=>1, 56368=>1, 56369=>1, 56370=>1, 56371=>1, 56372=>1, 56373=>1,
56374=>1, 56375=>1, 56376=>1, 56377=>1, 56378=>1, 56379=>1, 56380=>1,
56381=>1, 56382=>1, 56383=>1, 56384=>1, 56385=>1, 56386=>1, 56387=>1,
56388=>1, 56389=>1, 56390=>1, 56391=>1, 56392=>1, 56393=>1, 56394=>1,
56395=>1, 56396=>1, 56397=>1, 56398=>1, 56399=>1, 56400=>1, 56401=>1,
56402=>1, 56403=>1, 56404=>1, 56405=>1, 56406=>1, 56407=>1, 56408=>1,
56409=>1, 56410=>1, 56411=>1, 56412=>1, 56413=>1, 56414=>1, 56415=>1,
56416=>1, 56417=>1, 56418=>1, 56419=>1, 56420=>1, 56421=>1, 56422=>1,
56423=>1, 56424=>1, 56425=>1, 56426=>1, 56427=>1, 56428=>1, 56429=>1,
56430=>1, 56431=>1, 56432=>1, 56433=>1, 56434=>1, 56435=>1, 56436=>1,
56437=>1, 56438=>1, 56439=>1, 56440=>1, 56441=>1, 56442=>1, 56443=>1,
view all matches for this distribution
view release on metacpan or search on metacpan
SHA1 117c083f8fde8cf11f46a1b1ac95988e2e4ec8f6 mason/change_column.mhtml
SHA1 61b56c2478793e4584c81849d3dc3ef9d86771ff mason/change_column_name.mhtml
SHA1 9c51de2f3615e08fcdd0e4714aacaf0683457ab6 mason/change_schema_instantiation.mhtml
SHA1 c0bcbc757f20311eeba61e72462015d612b6cf1a mason/change_schema_name.mhtml
SHA1 67b0ff751763b8402f1f916489c273bb3fd19325 mason/change_table_attributes.mhtml
SHA1 6fc21a42b565615f85570cf22404f7421244b824 mason/change_table_comment.mhtml
SHA1 70e19eddfa3a195e34c2aabb3e6db447bbe4c5bb mason/change_table_name.mhtml
SHA1 d3d0606c1d5e776ae6e329fe9c1ca4f99c81f443 mason/cube_logo.jpg
SHA1 5c60e3ccca219cea330c77f61560997352d068c0 mason/delete_column.mhtml
SHA1 0e6e4e5f2f45fc3b6c06e323ece2cfeef2fd871c mason/delete_foreign_key.mhtml
SHA1 5a57bb43601da789dd0a42b1113495afc801a3da mason/delete_index.mhtml
view all matches for this distribution
view release on metacpan or search on metacpan
SHA1 7765c4067cdc3d479927a9d39271c2eaebb47efb lib/Alzabo/Runtime/Cursor.pm
SHA1 b935b85cb5104020571f9bc92c768ed2c2622c28 lib/Alzabo/Runtime/ForeignKey.pm
SHA1 98cdbbcf494436195b6b1066a255e3fd49eae082 lib/Alzabo/Runtime/Index.pm
SHA1 d6020951072aa9d3c31c2331b135b7c97624401e lib/Alzabo/Runtime/InsertHandle.pm
SHA1 e9f9384bb2b33a7b37a2a5edd558fd564449a58c lib/Alzabo/Runtime/JoinCursor.pm
SHA1 e099c87c9eb801d070d94046b7545acf19008d30 lib/Alzabo/Runtime/Row.pm
SHA1 5d533602334bb04a30f9802b1171c7a4fd2ab315 lib/Alzabo/Runtime/RowCursor.pm
SHA1 3fa4206befef7da4bc1a1d6b0bfc8a87045fc232 lib/Alzabo/Runtime/RowState/Deleted.pm
SHA1 47b9e4dc8d77af6443baa0c92393311cd4923d3d lib/Alzabo/Runtime/RowState/InCache.pm
SHA1 ac9916a03a0b574826b73d36161802d0e2607481 lib/Alzabo/Runtime/RowState/Live.pm
SHA1 df04b6491aa096118da455e432cc8d08cd167073 lib/Alzabo/Runtime/RowState/Potential.pm
view all matches for this distribution
view release on metacpan or search on metacpan
t/presidents.json view on Meta::CPAN
{
"age_at_inauguration" : 55,
"total_national_votes" : 26753786,
"year_first_inaugurated" : 1921,
"percentage_of_electorial_vote" : "76.1",
"number_of_electoral_votes" : "404",
"name" : "Warren G. Harding",
"college" : "None",
"occupation" : "Editor",
"percentage_of_popular_vote" : "60.3",
"state_elected_from" : "Ohio",
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Amazon/S3/Thin.pm view on Meta::CPAN
=head2 Comparison to precedent modules
There are already some useful modules like L<Amazon::S3>, L<Net::Amazon::S3>
on CPAN. They provide a "Perlish" interface, which looks pretty
for Perl programmers, but they also hide low-level behaviors.
For example, the "get_key" method translate HTTP status 404 into C<undef> and
HTTP 5xx status into exception.
In some situations, it is very important to see the raw HTTP communications.
That's why I made this module.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Amazon/S3/Constants.pm view on Meta::CPAN
Readonly our $HTTP_NO_CONTENT => 204;
Readonly our $HTTP_BAD_REQUEST => 400;
Readonly our $HTTP_UNAUTHORIZED => 401;
Readonly our $HTTP_PAYMENT_RQUIRED => 402;
Readonly our $HTTP_FORBIDDEN => 403;
Readonly our $HTTP_NOT_FOUND => 404;
Readonly our $HTTP_CONFLICT => 409;
Readonly our $HTTP_MOVED_PERMANENTLY => 301;
Readonly our $HTTP_FOUND => 302;
Readonly our $HTTP_SEE_OTHER => 303;
Readonly our $HTTP_NOT_MODIFIED => 304;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Amazon/S3Curl/PurePerl.pm view on Meta::CPAN
return $args;
}
sub url_exists {
my $self = shift;
my @args = grep { !/-f/ } @{ $self->head_cmd }; #take out fail mode, want to parse and look for the 404.
log_info { "running " . join( " ", @_ ) } @args;
my @output = capture( @args );
die "no output received!" unless @output;
return 1 if $output[0] =~ /200 OK/;
return 0 if $output[0] =~ /404 Not Found/;
die "url_exists did not find a 200 or 404: $output[0]";
}
sub _exec {
my($self,$method) = @_;
my $meth = $method."_cmd";
lib/Amazon/S3Curl/PurePerl.pm view on Meta::CPAN
my $cmd = $s3curl->download_cmd;
system(@$cmd);
=head2 url_exists
Check to see if a given url returns a 404 or 200. return 1 if 200, return 0 if 404, die otherwise.
=head1 LICENSE
This library is free software and may be distributed under the same terms as perl itself.
view all matches for this distribution
view release on metacpan or search on metacpan
Amethyst/Brain/Infobot/Module/Zippy.pm view on Meta::CPAN
Quick, sing me the BUDAPEST NATIONAL ANTHEM!!
RELATIVES!!
Remember, in 2039, MOUSSE & PASTA will be available ONLY by prescription!!
RHAPSODY in Glue!
SANTA CLAUS comes down a FIRE ESCAPE wearing bright blue LEG WARMERS ... He scrubs the POPE with a mild soap or detergent for 15 minutes, starring JANE FONDA!!
Send your questions to ``ASK ZIPPY'', Box 40474, San Francisco, CA 94140, USA
SHHHH!! I hear SIX TATTOOED TRUCK-DRIVERS tossing ENGINE BLOCKS into empty OIL DRUMS ...
Should I do my BOBBIE VINTON medley?
Should I get locked in the PRINCICAL'S OFFICE today -- or have a VASECTOMY??
Should I start with the time I SWITCHED personalities with a BEATNIK hair stylist or my failure to refer five TEENAGERS to a good OCULIST? Sign my PETITION.
So this is what it feels like to be potato salad
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Amon2/Lite.pm view on Meta::CPAN
'Content-Length' => length($content),
],
[$content]
);
} else {
return $c->res_404();
}
}
};
my $tmpl_dir = File::Spec->catdir(dirname((caller(0))[1]), 'tmpl');
view all matches for this distribution
view release on metacpan or search on metacpan
t/009_csrf_defender.t view on Meta::CPAN
} elsif ($c->req->path_info eq '/finished') {
return $c->create_response(200, [], ['OK']);
} elsif ($c->req->path_info eq '/get_csrf_defender_token') {
return $c->create_response(200, [], [$c->get_csrf_defender_token]);
} else {
return $c->create_response(404, [], []);
}
}
my $session = HTTP::Session::Store::OnMemory->new();
__PACKAGE__->load_plugins(
'Web::CSRFDefender' => {},
view all matches for this distribution
view release on metacpan or search on metacpan
t/01_basic.t view on Meta::CPAN
200,
[],
['kai'],
);
}
return $c->create_response(404, [], []);
}
__PACKAGE__->load_plugins('Web::ChromeLogger');
}
my $mech = Test::WWW::Mechanize::PSGI->new(app => MyApp::Web->to_app);
view all matches for this distribution
view release on metacpan or search on metacpan
t/003_session.t view on Meta::CPAN
} elsif ($c->request->path_info eq '/step2') {
return $c->render('step2');
} elsif ($c->request->path_info eq '/step3') {
return $c->render('step3');
} else {
return $c->create_response(404, [], []);
}
}
__PACKAGE__->load_plugins(
'Web::HTTPSession' => {
view all matches for this distribution
view release on metacpan or search on metacpan
t/01_basic.t view on Meta::CPAN
}
elsif ( $c->request->path_info eq '/user' ) {
return $c->create_response( 200, [], [] );
}
else {
return $c->create_response( 404, [], [] );
}
}
__PACKAGE__->load_plugins('Web::Maintenance');
}
view all matches for this distribution
view release on metacpan or search on metacpan
t/01_basic.t view on Meta::CPAN
200,
[],
[ $c->woothee->name ],
);
}
return $c->create_response(404, [], []);
}
__PACKAGE__->load_plugins('Web::Woothee');
}
my $agent = {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Amon2/Web/Dispatcher/RouterSimple/Extended.pm view on Meta::CPAN
if (my $p = $class->match($req->env)) {
my $action = $p->{action};
$c->{args} = $p;
"@{[ ref Amon2->context ]}::C::$p->{controller}"->$action($c, $p);
} else {
$c->res_404();
}
}
1;
__END__
view all matches for this distribution
view release on metacpan or search on metacpan
eg/apps/DeepNamespace/lib/DeepNamespace/Web/Admin/Dispatcher.pm view on Meta::CPAN
sub dispatch {
my ($class, $c) = @_;
if ($c->request->path_info eq '/') {
return DeepNamespace::Web::Admin::C::Root->index($c);
} else {
return $c->res_404();
}
}
1;
view all matches for this distribution
view release on metacpan or search on metacpan
Compiler/parser.c view on Meta::CPAN
209, 211, 215, 216, 218, 221, 223, 226, 230, 234,
236, 238, 242, 246, 250, 254, 258, 262, 266, 270,
274, 278, 282, 286, 288, 294, 296, 300, 304, 308,
312, 316, 318, 322, 326, 330, 334, 338, 342, 344,
348, 352, 356, 360, 364, 368, 372, 376, 378, 381,
384, 387, 390, 393, 396, 398, 401, 404, 406, 412,
421, 423, 425, 426, 428, 430, 432, 434, 436, 438,
440, 442, 444, 449, 453, 458, 464, 469, 475, 482,
486, 487, 491, 496, 497, 500, 504, 511, 512, 515,
519, 520, 522, 524, 527, 529, 533, 536, 537, 540,
542, 544, 547, 548, 551, 554, 556, 560, 564, 566,
Compiler/parser.c view on Meta::CPAN
{
amd_yyval.av = amd_yyvsp[0].av;
;
break;}
case 154:
#line 1404 "parser.y"
{
av_push(amd_yyvsp[-1].av, &PL_sv_undef); /* XXX Fix L_ELLIPSIS */
amd_yyval.av = amd_yyvsp[-1].av;
;
break;}
view all matches for this distribution
view release on metacpan or search on metacpan
SHA1 1385f1352c201994fc48e0da7717ef4616bafab2 lib/Antispam/Toolkit/Types.pm
SHA1 3f9dd4143fd85e2d36b526cc8f4d8681c6bc7b63 lib/Antispam/Toolkit/Types/Internal.pm
SHA1 632bc860a1d7914f9fc4fb67a0d806bc48e2aa47 t/BerkeleyDB.t
SHA1 b3a92fa4f21a0729d45457b63c04f0d878cfa73d t/Result.t
SHA1 2c4cbfe49b8ede97f88a8c31ceabf84ec5ee0a2a t/data/listed_email_7.txt
SHA1 e6d1b74040e4e5722fd4b94eb472349706ea5a0b t/data/more_email.txt
SHA1 a032c41ef6887fab1b900669c2d304fab46680e2 t/release-eol.t
SHA1 961a1e2c92d836c8cad2d34b784cbc75345dec63 t/release-kwalitee.t
SHA1 455d1dd1867212a665ad5ea4126b572411de300c t/release-no-tabs.t
SHA1 f77552b82463a39324fd2a13ae15d2c146213bf5 t/release-pod-coverage.t
SHA1 ce3cd60596d39a197c70ad6335346e6be6c845ef t/release-pod-spell.t
view all matches for this distribution
view release on metacpan or search on metacpan
SHA1 f5b1b241cc014a09ebd7995ff99fd2b7556be301 lib/Antispam/httpBL.pm
SHA1 093f77a04cc0612c8dcd98123e2ce1d982f6a573 t/httpBL.t
SHA1 a032c41ef6887fab1b900669c2d304fab46680e2 t/release-eol.t
SHA1 961a1e2c92d836c8cad2d34b784cbc75345dec63 t/release-kwalitee.t
SHA1 455d1dd1867212a665ad5ea4126b572411de300c t/release-no-tabs.t
SHA1 9433c240fe590bc404ab68ff63984df763e347ed t/release-pod-coverage.t
SHA1 b30cbdfaf935017c4568c0c91b242438cb87786e t/release-pod-syntax.t
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.10 (GNU/Linux)
iEYEARECAAYFAkzr7pcACgkQIgMCsV8qvRLd9ACcD2XxgU/M8y+zIRFbG/76EmHm
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Any/Daemon/HTTP.pod view on Meta::CPAN
Translate incoming request paths into browser redirects.
=item * dynamic content handlers per VirtualHost
When there is no matching file, a handler will be called to produce the
required information. The default handler will produce 404 errors.
=item * dynamic content caching
Reduce transmitting dynamic content using C<ETag> and C<MD5>'s
view all matches for this distribution
view release on metacpan or search on metacpan
xt/author/00-compile.t
xt/author/eol.t
xt/author/kwalitee.t
xt/author/mojibake.t
xt/author/no-tabs.t
xt/author/pod-no404s.t
xt/author/pod-spell.t
xt/author/pod-syntax.t
xt/author/portability.t
xt/release/changes_has_content.t
xt/release/cpan-changes.t
view all matches for this distribution
view release on metacpan or search on metacpan
t/56962.log view on Meta::CPAN
192.168.192.149 - - [31/Mar/2010:00:01:12 +0800] "GET /cgi-bin/john/index.fcgi HTTP/1.0" 200 7150 58.34.84.149
192.168.208.92 - - [31/Mar/2010:00:01:12 +0800] "GET /cgi-bin/bill/bill.fcgi?tm=1 HTTP/1.0" 200 890 117.136.9.58
192.168.192.149 - - [31/Mar/2010:00:01:12 +0800] "GET /cgi-bin/john/flowjohn.fcgi?tm=3 HTTP/1.0" 200 1481 116.52.145.132
192.168.192.148 - - [31/Mar/2010:00:01:12 +0800] "GET /cgi-bin/bill/index.fcgi HTTP/1.0" 200 8805 119.john.197.17
192.168.192.148 - - [31/Mar/2010:00:01:13 +0800] "GET /cgi-bin/bill/index.fcgi HTTP/1.0" 200 8805 116.23.13.232
192.168.208.92 - - [31/Mar/2010:00:01:13 +0800] "GET /_vti_bin/owssvr.dll?UL=1&ACT=4&BUILD=8164&STRMVER=4&CAPREQ=0 HTTP/1.0" 404 217 58.255.32.1
192.168.208.92 - - [31/Mar/2010:00:01:14 +0800] "GET /cgi-bin/john/index.fcgi HTTP/1.0" 200 7145 58.255.32.1
192.168.208.92 - - [31/Mar/2010:00:01:14 +0800] "GET /bill/job_gz_2010.html? HTTP/1.0" 200 17987 60.29.168.46
192.168.192.149 - - [31/Mar/2010:00:01:15 +0800] "GET /cgi-bin/bill/index.fcgi HTTP/1.0" 200 8803 113.115.183.77
192.168.208.92 - - [31/Mar/2010:00:01:15 +0800] "GET /MSOffice/cltreq.asp?UL=1&ACT=4&BUILD=8164&STRMVER=4&CAPREQ=0 HTTP/1.0" 404 217 58.255.32.1
192.168.192.149 - - [31/Mar/2010:00:01:15 +0800] "GET /cgi-bin/john/flowjohn.fcgi?tm=2 HTTP/1.0" 200 1483 116.52.145.132
192.168.192.148 - - [31/Mar/2010:00:01:15 +0800] "GET /cgi-bin/bill/index.fcgi HTTP/1.0" 200 8809 58.214.34.75
192.168.208.93 - - [31/Mar/2010:00:01:16 +0800] "GET /cgi-bin/bill/logoutbill.fcgi HTTP/1.0" 200 9191 218.200.118.202
192.168.208.93 - - [31/Mar/2010:00:01:16 +0800] "GET /bill/job_sy.html? HTTP/1.0" 200 10603 218.200.118.202
192.168.208.93 - - [31/Mar/2010:00:01:18 +0800] "GET /cgi-bin/bill/flow.fcgi?tm=0 HTTP/1.0" 200 1196 221.4.154.10
view all matches for this distribution
view release on metacpan or search on metacpan
t/800_utils/Tracker/HTTP.pm view on Meta::CPAN
);
}
sub on_read {
my ($s, $h, $fh, $ip, $port) = @_;
my ($status, $body) = ('404 EH!?', 'Sorry. Play again.');
if ($h->rbuf =~ s[^GET (.+?)(?:\?(.+))? HTTP/1\.(\d)\015\012][]) {
my ($path, $args, $ver) = ($1, $2, $3);
my %args = map { m[^(.+?)(?:=(.*))?$]; $1 => $2; }
split qr[[&;]], $args;
my %headers = map { m[^(.+?)\s*:\s*(.+)$]; $1 => $2; }
view all matches for this distribution
view release on metacpan or search on metacpan
t/release-common_spelling.t
t/release-kwalitee.t
t/release-no-tabs.t
t/release-pod-coverage.t
t/release-pod-linkcheck.t
t/release-pod-no404s.t
t/release-pod-syntax.t
t/release-synopsis.t
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AnyEvent/DAAP/Server.pm view on Meta::CPAN
sub _database_container_items {
my ($self, $connection, $req, $args) = @_;
# $args->{database_id}, $args->{container_id}
my $playlist = $self->playlists->{ $args->{container_id} }
or return $connection->respond(404);
my $tracks = $self->__format_tracks_as_dmap($req, scalar $playlist->tracks);
$connection->respond_dmap([[
'daap.playlistsongs' => [
[ 'dmap.status' => 200 ],
lib/AnyEvent/DAAP/Server.pm view on Meta::CPAN
sub _database_item {
my ($self, $connection, $req, $args) = @_;
# $args->{database_id}, $args->{item_id}
my $track = $self->tracks->{ $args->{item_id} }
or return $connection->respond(404);
$track->stream($connection, $req, $args);
}
sub __format_tracks_as_dmap {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AnyEvent.pm view on Meta::CPAN
Lambda/AnyEvent 0.327 sec
+ optimized 0.138 sec
Raw sockets/select 0.077 sec
POE/select, components 0.662 sec
POE/select, raw sockets 0.226 sec
POE/select, optimized 0.404 sec
AnyEvent/select/nb 0.085 sec
AnyEvent/EV/nb 0.068 sec
+state machine 0.134 sec
view all matches for this distribution