Result:
found more than 742 distributions - search limited to the first 2001 files matching your query ( run in 2.203 )


AnyEvent-BitTorrent

 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


AnyEvent-CurrentCost

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

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


AnyEvent-DAAP-Server

 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


AnyEvent-GPSD

 view release on metacpan or  search on metacpan

eg/example.aegps  view on Meta::CPAN

[1216374400.6137,"raw","GPSD,O=MID2 1216374613.000 0.005 49.025807 8.448581 121.41 6.40 26.66 194.3865 6.366 0.058 ? 12.80 ? 3"]
[1216374401.60522,"raw","GPSD,Y=MID4 1216374614.000 12:10 68 265 44 1:13 17 91 33 1:28 23 156 38 1:8 82 102 38 1:7 43 57 39 1:27 53 58 39 1:25 24 57 37 1:24 22 301 33 1:26 27 283 35 1:15 15 282 33 0:2 12 220 38 1:124 32 162 31 0:"]
[1216374401.62173,"raw","GPSD,O=MID2 1216374614.000 0.005 49.025745 8.448557 120.78 6.40 26.66 194.9941 7.637 0.116 ? ? ? 3"]
[1216374402.6297,"raw","GPSD,O=MID2 1216374615.000 0.005 49.025676 8.448532 120.80 6.40 26.66 195.1110 9.162 0.066 78.1801 12.80 ? 3"]
[1216374403.62182,"raw","GPSD,O=MID2 1216374616.000 0.005 49.025583 8.448489 120.51 6.40 26.66 195.3105 10.608 0.111 61.2232 12.80 ? 3"]
[1216374404.61874,"raw","GPSD,O=MID2 1216374617.000 0.005 49.025484 8.448443 120.87 6.40 26.66 195.5015 11.149 0.060 57.8796 12.80 ? 3"]
[1216374405.64176,"raw","GPSD,O=MID2 1216374618.000 0.005 49.025384 8.448398 121.23 6.40 26.66 196.5157 12.174 0.038 57.8764 12.80 ? 3"]
[1216374406.60122,"raw","GPSD,Y=MID4 1216374619.000 12:10 68 265 44 1:13 17 91 33 1:28 23 156 38 1:8 82 102 38 1:7 43 57 39 1:27 53 58 38 1:25 24 57 37 1:24 22 301 32 1:26 27 283 36 1:15 15 282 21 0:2 12 220 39 1:124 32 162 34 0:"]
[1216374406.63779,"raw","GPSD,O=MID2 1216374619.000 0.005 49.025278 8.448353 120.83 6.40 26.66 196.8412 13.180 0.029 ? ? ? 3"]
[1216374407.61377,"raw","GPSD,O=MID2 1216374620.000 0.005 49.025154 8.448291 120.89 6.40 26.66 197.2598 14.012 0.032 47.5435 12.80 ? 3"]
[1216374408.61126,"raw","GPSD,O=MID2 1216374621.000 0.005 49.025029 8.448241 121.03 6.40 26.66 197.4303 14.476 0.075 48.0487 12.80 ? 3"]

eg/example.aegps  view on Meta::CPAN

[1216374466.61725,"raw","GPSD,Y=MID4 1216374679.000 12:10 68 262 41 1:13 17 91 29 1:28 24 156 28 1:8 82 96 38 1:7 43 57 35 1:27 52 58 36 1:25 23 57 22 1:24 22 300 20 0:26 28 283 43 1:15 15 282 37 1:2 11 220 30 1:124 32 162 34 0:"]
[1216374466.62978,"raw","GPSD,O=MID2 1216374679.000 0.005 49.018227 8.441036 125.14 6.40 26.66 230.4219 14.292 0.128 ? ? ? 3"]
[1216374467.63779,"raw","GPSD,O=MID2 1216374680.000 0.005 49.018148 8.440885 124.84 6.40 26.66 230.8073 14.007 0.073 48.7759 12.80 ? 3"]
[1216374468.63777,"raw","GPSD,O=MID2 1216374681.000 0.005 49.018061 8.440745 125.28 6.40 26.66 230.1946 13.993 0.166 48.9918 12.80 ? 3"]
[1216374469.64976,"raw","GPSD,O=MID2 1216374682.000 0.005 49.017982 8.440594 124.98 6.40 26.66 229.5705 14.333 0.127 48.7720 12.80 ? 3"]
[1216374470.62576,"raw","GPSD,O=MID2 1216374683.000 0.005 49.017896 8.440441 125.33 6.40 26.66 228.9569 14.302 0.045 47.0373 12.80 ? 3"]
[1216374471.62069,"raw","GPSD,Y=MID4 1216374684.000 11:10 68 262 41 1:13 17 91 30 1:28 24 156 21 1:8 82 96 38 1:7 43 57 35 1:27 52 58 35 1:25 23 57 21 1:26 28 283 43 1:15 15 282 26 1:2 11 220 30 1:124 32 162 34 0:"]
[1216374471.63958,"raw","GPSD,O=MID2 1216374684.000 0.005 49.017817 8.440290 125.02 6.40 26.66 228.9568 14.302 0.045 ? ? ? 3"]
[1216374472.62963,"raw","GPSD,O=MID2 1216374685.000 0.005 49.017724 8.440150 124.71 6.40 26.66 228.4796 14.431 0.032 47.6105 12.80 ? 3"]
[1216374473.62176,"raw","GPSD,O=MID2 1216374686.000 0.005 49.017638 8.439996 125.06 6.40 26.66 228.6420 14.963 0.144 47.0329 12.80 ? 3"]
[1216374474.63376,"raw","GPSD,O=MID2 1216374687.000 0.005 49.017552 8.439843 125.40 6.40 26.66 229.0093 15.419 0.176 47.0355 12.80 ? 3"]

eg/example.aegps  view on Meta::CPAN

[1216374523.63326,"raw","GPSD,O=MID2 1216374736.000 0.005 49.014250 8.431442 127.88 6.40 26.66 248.2373 14.108 0.074 47.3783 12.80 ? 3"]
[1216374524.64339,"raw","GPSD,O=MID2 1216374737.000 0.005 49.014204 8.431268 128.35 6.40 26.66 246.8460 14.599 0.185 50.0613 12.80 ? 3"]
[1216374525.63927,"raw","GPSD,O=MID2 1216374738.000 0.005 49.014153 8.431080 127.97 6.40 26.66 247.2620 14.957 0.055 46.7001 12.80 ? 3"]
[1216374526.61869,"raw","GPSD,Y=MID4 1216374739.000 12:10 68 262 39 1:13 16 93 29 1:28 24 154 29 1:8 81 93 39 1:7 42 57 35 1:27 52 58 37 1:25 23 57 30 1:24 22 300 32 1:26 28 283 28 1:15 15 282 23 1:2 11 220 26 1:124 32 162 36 0:"]
[1216374526.63549,"raw","GPSD,O=MID2 1216374739.000 0.005 49.014096 8.430890 128.25 6.40 26.66 247.0282 14.848 0.067 ? ? ? 3"]
[1216374527.63931,"raw","GPSD,O=MID2 1216374740.000 0.005 49.014045 8.430702 127.87 6.40 26.66 246.4244 14.955 0.229 46.6959 12.80 ? 3"]
[1216374528.63126,"raw","GPSD,O=MID2 1216374741.000 0.005 49.013994 8.430514 127.49 6.40 26.66 247.2616 14.957 0.055 46.6959 12.80 ? 3"]
[1216374529.62727,"raw","GPSD,O=MID2 1216374742.000 0.005 49.013936 8.430325 127.76 6.40 26.66 246.5501 14.632 0.091 45.5011 12.80 ? 3"]
[1216374530.6273,"raw","GPSD,O=MID2 1216374743.000 0.005 49.013891 8.430137 128.14 6.40 26.66 247.0421 14.135 0.154 47.3801 12.80 ? 3"]
[1216374531.61463,"raw","GPSD,Y=MID4 1216374744.000 12:10 68 262 38 1:13 16 93 27 1:28 24 154 19 1:8 81 93 39 1:7 42 57 36 1:27 52 58 36 1:25 23 57 30 1:24 22 300 26 1:26 28 283 24 1:15 15 282 24 1:2 11 220 16 1:124 32 162 31 0:"]
[1216374531.65707,"raw","GPSD,O=MID2 1216374744.000 0.005 49.013846 8.429964 127.21 6.40 26.66 247.8946 13.015 0.116 ? ? ? 3"]

eg/example.aegps  view on Meta::CPAN

[1216374668.64071,"raw","GPSD,O=MID2 1216374881.000 0.005 49.009821 8.419156 124.02 6.40 26.66 237.4663 4.856 0.117 ? 12.80 ? 3"]
[1216374669.65671,"raw","GPSD,O=MID2 1216374882.000 0.005 49.009793 8.419096 124.07 6.40 26.66 234.3975 5.756 0.097 ? 12.80 ? 3"]
[1216374670.64579,"raw","GPSD,O=MID2 1216374883.000 0.005 49.009766 8.419022 124.03 6.40 26.66 237.7445 6.601 0.080 ? 12.80 ? 3"]
[1216374671.62923,"raw","GPSD,Y=MID4 1216374884.000 12:10 68 259 38 1:28 25 154 21 1:2 10 220 32 1:8 81 88 39 1:7 41 57 40 1:27 51 58 28 1:15 16 283 35 1:26 29 283 31 1:24 22 300 30 1:25 22 57 31 1:13 15 93 20 1:124 36 162 32 0:"]
[1216374671.64576,"raw","GPSD,O=MID2 1216374884.000 0.005 49.009734 8.418935 123.13 6.40 26.66 242.0817 6.857 0.140 ? ? ? 3"]
[1216374672.64977,"raw","GPSD,O=MID2 1216374885.000 0.005 49.009714 8.418848 123.75 6.40 26.66 246.1099 7.127 0.024 87.0404 12.80 ? 3"]
[1216374673.63776,"raw","GPSD,O=MID2 1216374886.000 0.005 49.009689 8.418747 123.51 6.40 26.66 252.0663 7.441 0.004 78.3724 12.80 ? 3"]
[1216374674.66189,"raw","GPSD,O=MID2 1216374887.000 0.005 49.009678 8.418635 123.29 6.40 26.66 260.8159 7.831 0.092 75.3952 12.80 ? 3"]
[1216374675.63776,"raw","GPSD,O=MID2 1216374888.000 0.005 49.009666 8.418523 123.06 6.40 26.66 267.6281 8.017 0.123 75.4098 12.80 ? 3"]
[1216374676.62523,"raw","GPSD,Y=MID4 1216374889.000 12:10 68 258 39 1:28 25 154 33 1:2 10 219 17 1:8 81 87 38 1:7 41 57 38 1:27 51 58 37 1:15 16 283 36 1:26 29 283 35 1:24 22 298 34 1:25 22 57 31 1:13 15 93 21 0:124 36 162 34 0:"]
[1216374676.64161,"raw","GPSD,O=MID2 1216374889.000 0.005 49.009668 8.418413 122.94 6.40 26.66 271.5492 8.205 0.138 ? ? ? 3"]

eg/example.aegps  view on Meta::CPAN

[1216374776.63722,"raw","GPSD,Y=MID4 1216374989.000 10:10 68 258 37 1:28 26 154 36 1:2 10 219 36 1:8 80 84 39 1:7 41 57 34 1:27 50 58 34 1:15 17 283 20 1:25 21 57 36 1:13 15 93 30 1:124 36 162 34 0:"]
[1216374776.64975,"raw","GPSD,O=MID2 1216374989.000 0.005 49.009391 8.417383 124.49 1.60 6.67 0.0000 0.000 0.000 ? ? ? 3"]
[1216374777.64974,"raw","GPSD,O=MID2 1216374990.000 0.005 49.009391 8.417383 124.49 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]
[1216374778.64159,"raw","GPSD,O=MID2 1216374991.000 0.005 49.009391 8.417383 124.49 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]
[1216374779.64173,"raw","GPSD,O=MID2 1216374992.000 0.005 49.009397 8.417383 125.25 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]
[1216374780.66574,"raw","GPSD,O=MID2 1216374993.000 0.005 49.009404 8.417385 124.60 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]
[1216374781.63321,"raw","GPSD,Y=MID4 1216374994.000 10:10 68 258 37 1:28 26 154 36 1:2 10 219 36 1:8 80 84 39 1:7 41 57 33 1:27 50 58 35 1:15 17 283 21 1:25 21 57 36 1:13 15 93 30 1:124 36 162 34 0:"]
[1216374781.64981,"raw","GPSD,O=MID2 1216374994.000 0.005 49.009404 8.417385 124.60 1.60 6.67 0.0000 0.000 0.000 ? ? ? 3"]
[1216374782.64175,"raw","GPSD,O=MID2 1216374995.000 0.005 49.009404 8.417385 124.60 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]
[1216374783.6457,"raw","GPSD,O=MID2 1216374996.000 0.005 49.009404 8.417385 124.60 1.60 6.67 307.7676 0.156 0.082 ? 3.20 ? 3"]
[1216374784.64173,"raw","GPSD,O=MID2 1216374997.000 0.005 49.009410 8.417387 123.95 1.60 6.67 315.4831 0.150 -0.093 ? 3.20 ? 3"]
[1216374785.64175,"raw","GPSD,O=MID2 1216374998.000 0.005 49.009410 8.417387 123.95 1.60 6.67 315.4831 0.150 -0.093 ? 3.20 ? 3"]
[1216374786.62923,"raw","GPSD,Y=MID4 1216374999.000 10:10 68 258 36 1:28 26 154 36 1:2 10 219 36 1:8 80 84 39 1:7 41 57 33 1:27 50 58 36 1:15 17 283 21 1:25 21 57 35 1:13 15 93 29 1:124 36 162 35 0:"]
[1216374786.64172,"raw","GPSD,O=MID2 1216374999.000 0.005 49.009410 8.417387 123.95 1.60 6.67 0.0000 0.000 0.000 ? ? ? 3"]
[1216374787.64573,"raw","GPSD,O=MID2 1216375000.000 0.005 49.009417 8.417389 123.30 1.60 6.67 0.0000 0.000 0.000 ? 3.20 ? 3"]

eg/example.aegps  view on Meta::CPAN

[1216374867.64576,"raw","GPSD,O=MID2 1216375080.000 0.005 49.006457 8.412037 123.19 8.00 26.66 276.3689 0.124 -0.012 ? 16.00 ? 3"]
[1216374868.67779,"raw","GPSD,O=MID2 1216375081.000 0.005 49.006444 8.412048 123.18 8.00 26.66 180.0000 0.082 -0.094 ? 16.00 ? 3"]
[1216374869.65781,"raw","GPSD,O=MID2 1216375082.000 0.005 49.006443 8.412046 124.58 8.00 26.66 0.0000 0.082 0.094 ? 16.00 ? 3"]
[1216374870.67377,"raw","GPSD,O=MID2 1216375083.000 0.005 49.006418 8.412058 123.06 6.40 26.66 135.4762 0.150 0.093 ? 14.40 ? 3"]
[1216374871.65322,"raw","GPSD,Y=MID4 1216375084.000 11:10 68 255 38 1:28 27 154 23 1:15 17 283 16 1:8 80 79 41 1:7 40 57 45 1:27 50 58 37 1:2 9 219 20 1:13 14 94 22 0:24 22 297 21 1:25 21 57 23 1:120 29 210 29 0:"]
[1216374871.66574,"raw","GPSD,O=MID2 1216375084.000 0.005 49.006404 8.412069 123.05 6.40 26.66 131.5436 0.306 0.011 ? ? ? 3"]
[1216374872.65776,"raw","GPSD,O=MID2 1216375085.000 0.005 49.006397 8.412067 123.70 6.40 26.66 135.4762 0.150 0.093 ? 12.80 ? 3"]
[1216374873.66174,"raw","GPSD,O=MID2 1216375086.000 0.005 49.006378 8.412079 122.94 6.40 26.66 0.0000 0.000 0.000 ? 12.80 ? 3"]
[1216374874.64974,"raw","GPSD,O=MID2 1216375087.000 0.005 49.006378 8.412079 122.94 6.40 26.66 150.8771 0.217 -0.001 ? 12.80 ? 3"]
[1216374875.65374,"raw","GPSD,O=MID2 1216375088.000 0.005 49.006372 8.412079 122.18 6.40 26.66 0.0000 0.000 0.000 ? 12.80 ? 3"]
[1216374876.64122,"raw","GPSD,Y=MID4 1216375089.000 11:10 68 255 38 1:28 27 154 24 1:15 17 283 16 1:8 80 79 41 1:7 40 57 44 1:27 50 58 37 1:2 9 219 20 1:13 14 94 25 1:24 22 297 21 1:25 21 57 22 1:120 29 210 30 0:"]

eg/example.aegps  view on Meta::CPAN

[1216374922.65374,"raw","GPSD,O=MID2 1216375135.000 0.005 49.005562 8.405703 127.61 8.00 26.66 264.9140 15.765 0.055 55.2610 16.00 ? 3"]
[1216374923.66176,"raw","GPSD,O=MID2 1216375136.000 0.005 49.005552 8.405481 127.26 1.60 6.67 266.9242 15.776 -0.092 11.2411 9.60 ? 3"]
[1216374924.65776,"raw","GPSD,O=MID2 1216375137.000 0.005 49.005547 8.405274 126.37 1.60 6.67 267.8943 15.728 -0.160 12.1013 3.20 ? 3"]
[1216374925.65776,"raw","GPSD,O=MID2 1216375138.000 0.005 49.005544 8.405054 125.38 1.60 6.67 268.9868 15.930 -0.252 11.3656 3.20 ? 3"]
[1216374926.64921,"raw","GPSD,Y=MID4 1216375139.000 12:10 68 253 42 1:28 27 154 39 1:15 18 283 22 1:8 79 78 38 1:7 39 57 31 1:27 49 58 36 1:2 8 219 18 1:13 14 94 24 1:25 20 57 19 1:24 22 297 18 0:26 31 285 30 1:126 32 157 35 0:"]
[1216374926.67778,"raw","GPSD,O=MID2 1216375139.000 0.005 49.005540 8.404833 124.39 1.60 6.67 269.6168 15.910 -0.239 ? ? ? 3"]
[1216374927.66179,"raw","GPSD,O=MID2 1216375140.000 0.005 49.005542 8.404626 124.25 1.60 6.67 269.9208 14.124 -0.314 12.1058 3.20 ? 3"]
[1216374928.65774,"raw","GPSD,O=MID2 1216375141.000 0.005 49.005536 8.404433 123.45 1.60 6.67 270.0784 13.611 -0.347 12.9337 3.20 ? 3"]
[1216374929.65386,"raw","GPSD,O=MID2 1216375142.000 0.005 49.005530 8.404253 122.74 1.60 6.67 269.9614 13.363 -0.323 13.8902 3.20 ? 3"]
[1216374930.65777,"raw","GPSD,O=MID2 1216375143.000 0.005 49.005508 8.404097 123.53 1.60 6.67 269.9013 13.240 -0.311 15.5897 3.20 ? 3"]
[1216374931.65321,"raw","GPSD,Y=MID4 1216375144.000 10:10 68 253 0 0:28 27 154 17 1:15 18 283 0 1:8 79 78 0 0:7 39 57 15 1:27 49 58 0 1:2 8 219 0 1:13 14 94 0 1:25 20 57 17 1:26 31 285 0 1:"]
[1216374931.65927,"raw","GPSD,O=MID2 1216375144.000 0.005 49.005482 8.403913 ? 24.00 ? 270.5516 12.975 ? ? ? ? 2"]
[1216374932.64199,"raw","GPSD,O=MID2 1216375145.000 0.005 49.005482 8.403733 ? 17.60 ? 271.3752 13.083 ? ? 41.60 ? 2"]
[1216374933.62975,"raw","GPSD,O=MID2 1216375146.000 0.005 49.005488 8.403555 ? 17.60 ? 272.9171 13.060 ? ? 35.20 ? 2"]
[1216374934.64174,"raw","GPSD,O=MID2 1216375147.000 0.005 49.005494 8.403378 ? 17.60 ? 273.7397 13.300 ? ? 35.20 ? 2"]

 view all matches for this distribution


AnyEvent-GnuPG

 view release on metacpan or  search on metacpan

SIGNATURE  view on Meta::CPAN

SHA1 178454833d78bf31ed7ac604bc2fab8c3ca7e03f MANIFEST
SHA1 2fe72d61b50095aaac4c68b87878851640ccacd9 META.yml
SHA1 f0791d4f412afeeafab79a685014fb4d67f5be02 Makefile.PL
SHA1 0fd032ebbcd7bba61da2698a8ee5a9ee23b22b37 README
SHA1 3866b6cec88d29fd72240068a6b66df1ae999409 dist.ini
SHA1 3d31b7328ffc0cf9a8891992dba95d81c4042f21 lib/AnyEvent/GnuPG.pm
SHA1 1df65007fe3a6e5c6a199eb51e33d57a6e7757f0 t/00-all.t
SHA1 f214de96cfe8b70da71201ab8859bb32cbdafe1d t/author-critic.t
SHA1 1bf69b71b924777ef46b198af9435e8381149fc7 t/release-cpan-changes.t
SHA1 bdd52baa1a968cc0e1a577a7b073f046d563a317 t/release-kwalitee.t
SHA1 ca37d7b91c2299a98877a6f36d3fab51e8dd906f t/release-pod-coverage.t

 view all matches for this distribution


AnyEvent-HTTP-LWP-UserAgent-Determined

 view release on metacpan or  search on metacpan

lib/AnyEvent/HTTP/LWP/UserAgent/Determined.pm  view on Meta::CPAN

      my $resp = shift->recv;
      $after_c and $after_c->(
        $self, \@timing_tries, $pause_if_unsuccessful, $determination, \@args, $resp);

      my $code = $resp->code;
      unless( $determination->{$code} ) { # normal case: all is well (or 404, etc)
        $cv->send($resp); return;
      }
      if(defined $pause_if_unsuccessful) { # it's undef only on the last

        sleep $pause_if_unsuccessful if $pause_if_unsuccessful;

 view all matches for this distribution


AnyEvent-HTTP-LWP-UserAgent

 view release on metacpan or  search on metacpan

t/response_content_cb.t  view on Meta::CPAN


    sub handle_request {
        my ($self, $cgi) = @_;

        if($cgi->url(-path_info=>1) =~ m,/error$,) {
            print "HTTP/1.0 404 Not found\r\n";
            print "Content-Type: text/plain\r\n";
            print "\r\n";
            print "404 Not found";
            return;
        }
        print "HTTP/1.0 200 OK\r\n";
        print "Content-Type: text/html\r\n";
        print "Set-Cookie: test=abc; path=/\r\n";

t/response_content_cb.t  view on Meta::CPAN

            my $ua = $pkg->new(cookie_jar => {});
            my $content = '';
            my $res = $ua->get("http://localhost:$port/error", ':content_cb' => sub { $content .= $_[0] });
            ok !$res->is_success, '!is_success when error';
            is $content, '', 'callback when error';
            is $res->content, '404 Not found', 'content when error';
        }
    },
);

 view all matches for this distribution


AnyEvent-HTTPD-Router

 view release on metacpan or  search on metacpan

lib/AnyEvent/HTTPD/Router.pm  view on Meta::CPAN

    my %args  = @_;

    # todo documentation how to overwrite your dispathing
    my $dispatcher       = delete $args{dispatcher};
    my $routes           = delete $args{routes};
    my $auto_respond_404 = delete $args{auto_respond_404};
    my $dispatcher_class = delete $args{dispatcher_class}
        || 'AnyEvent::HTTPD::Router::DefaultDispatcher';
    my $known_methods    = delete $args{known_methods}
        || [ qw/GET HEAD POST PUT PATCH DELETE TRACE OPTIONS CONNECT/ ];

lib/AnyEvent/HTTPD/Router.pm  view on Meta::CPAN

        },
    );

    $self->reg_cb('no_route_found' => sub {
        my ( $httpd, $req ) = @_;
        $req->respond( [ 404, 'not found', {}, '' ] );
    }) if $auto_respond_404;

    if ($routes) {
        $self->reg_routes( @$routes );
    }

lib/AnyEvent/HTTPD/Router.pm  view on Meta::CPAN


Whenever you register a new route this modules checks if the method is either
customer method prefixed with ':' or a $known_method. You would need to change
this, if you would like to implement WebDAV, for example. This is an ArrayRef.

=item * C<auto_respond_404>

If the value for this parameter is set to true a a simple C<404> responder will
be installed that responds if not route matches. You can implement your own
handler see L<EVENTS>.

=back

lib/AnyEvent/HTTPD/Router.pm  view on Meta::CPAN

event C<no_route_found> will be emitted.

In the case that routes and callbacks (C<reg_cb()>) for paths as used with
C<AnyEvent::HTTPD> are mixed, keep in mind that that C<no_route_found> will
happen before the other path callbacks are executed. So for a
C<404 not found> handler you could do

    $httpd->reg_cb('' => sub {
        my ( $httpd, $req ) = @_;
        $req->respond( [ 404, 'not found', {}, '' ] );
    });

If you just use C<reg_routes()> and don't mix with C<reg_cb()> for paths you
could implement the C<404 not found> handler like this:

    $httpd->reg_cb('no_route_found' => sub {
        my ( $httpd, $req ) = @_;
        $req->respond( [ 404, 'not found', {}, '' ] );
    });

This is exactly what you get if you specify C<auto_respond_404> at the
constructor.

=item * See L<AnyEvent::HTTPD/EVENTS>

=back

 view all matches for this distribution


AnyEvent-HTTPD

 view release on metacpan or  search on metacpan

lib/AnyEvent/HTTPD/Request.pm  view on Meta::CPAN

      '/image/elmex' => sub {
         my ($httpd, $req) = @_;

         open IMG, "$ENV{HOME}/media/images/elmex.png"
            or $req->respond (
                  [404, 'not found', { 'Content-Type' => 'text/plain' }, 'not found']
               );

         $req->respond ({ content => ['image/png', do { local $/; <IMG> }] });
      }
   );

lib/AnyEvent/HTTPD/Request.pm  view on Meta::CPAN

   $self->{responded} = 1;

   my $no_body = $self->method eq 'HEAD';

   if (not defined $res) {
      $rescb->(404, "ok", { 'Content-Type' => 'text/html' }, "<h1>No content</h1>", $no_body);

   } else {
      $rescb->(@$res, $no_body);
   }
}

 view all matches for this distribution


AnyEvent-IRC

 view release on metacpan or  search on metacpan

lib/AnyEvent/IRC/Util.pm  view on Meta::CPAN

   '394' => 'RPL_ENDOFUSERS',
   '395' => 'RPL_NOUSERS',
   '401' => 'ERR_NOSUCHNICK',
   '402' => 'ERR_NOSUCHSERVER',
   '403' => 'ERR_NOSUCHCHANNEL',
   '404' => 'ERR_CANNOTSENDTOCHAN',
   '405' => 'ERR_TOOMANYCHANNELS',
   '406' => 'ERR_WASNOSUCHNICK',
   '407' => 'ERR_TOOMANYTARGETS',
   '408' => 'ERR_NOSUCHSERVICE',
   '409' => 'ERR_NOORIGIN',

 view all matches for this distribution


AnyEvent-MP

 view release on metacpan or  search on metacpan

MP.pm  view on Meta::CPAN

commandline clients.

   configure nodeid => "myscript/%n/%u";

Example: configure a node using a profile called seed, which is suitable
for a seed node as it binds on all local addresses on a fixed port (4040,
customary for aemp).

   # use the aemp commandline utility
   # aemp profile seed binds '*:4040'

   # then use it
   configure profile => "seed";

   # or simply use aemp from the shell again:

 view all matches for this distribution


AnyEvent-MQTT

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/author-critic.t
t/author-eol.t
t/author-no-tabs.t
t/author-pod-coverage.t
t/author-pod-linkcheck.t
t/author-pod-no404s.t
t/author-pod-syntax.t
t/author-synopsis.t
t/release-common_spelling.t
t/release-kwalitee.t

 view all matches for this distribution


AnyEvent-MockTCPServer

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/05-error.t
t/author-critic.t
t/author-eol.t
t/author-no-tabs.t
t/author-pod-coverage.t
t/author-pod-no404s.t
t/author-pod-syntax.t
t/author-synopsis.t
t/release-common_spelling.t
t/release-kwalitee.t
t/release-pod-linkcheck.t

 view all matches for this distribution


AnyEvent-MultiDownload

 view release on metacpan or  search on metacpan

t/01_simple_get.t  view on Meta::CPAN


    sub handle_request {
        my ($self, $cgi) = @_;

        if($cgi->url(-path_info=>1) =~ m,/error$,) {
            print "HTTP/1.0 404 Not found\r\n";
            print "Content-Type: text/plain\r\n";
            print "\r\n";
            print "404 Not found";
            return;
        }

        my $body = 
         "a" x 1024  . "b"  x 1024 .

 view all matches for this distribution


AnyEvent-Net-Curl-Queued

 view release on metacpan or  search on metacpan

inc/Test/HTTP/AnyEvent/Server.pm  view on Meta::CPAN

                    $h->push_write($res->as_string("\015\012"));
                    _cleanup($h);
                };
                return;
            } default {
                $res->code(404);
                $res->message('Not Found');
                $res->content('Not Found');
            }
        }
    } else {

 view all matches for this distribution


AnyEvent-OWNet

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

t/Helpers.pm
t/author-critic.t
t/author-eol.t
t/author-no-tabs.t
t/author-pod-coverage.t
t/author-pod-no404s.t
t/author-pod-syntax.t
t/author-synopsis.t
t/release-common_spelling.t
t/release-kwalitee.t
t/release-pod-linkcheck.t

 view all matches for this distribution


AnyEvent-Onkyo

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

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


AnyEvent-Proc

 view release on metacpan or  search on metacpan

SIGNATURE  view on Meta::CPAN


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

SHA1 ed0dd3f852d94faeef9497da43c28919f871db21 CONTRIBUTORS
SHA1 dc144049bb6da2e1c923bdb221efa3340846066e Changes
SHA1 aafef7efd5e9bbc5bb597870f6bf837cf22f7892 LICENSE
SHA1 de6f714f2afff642db9fb1a0e8691cb28bf988f1 MANIFEST
SHA1 bb23e79cd61c036c9c7124f1c0826b0f02ceec07 META.yml
SHA1 55c198cb0582a102fce0ca2507a6c442d19f3deb Makefile.PL
SHA1 61cb135709205320d9e9a51659bae031552151dd README

 view all matches for this distribution


AnyEvent-REST-Server

 view release on metacpan or  search on metacpan

lib/AnyEvent/REST/Server.pm  view on Meta::CPAN

    307 => 'Temporary Redirect',
    400 => 'Bad Request',
    401 => 'Unauthorized',
    402 => 'Payment Required',
    403 => 'Forbidden',
    404 => 'Not Found',
    405 => 'Method Not Allowed',
    406 => 'Not Acceptable',
    407 => 'Proxy Authentication Required',
    408 => 'Request Timeout',
    409 => 'Conflict',

lib/AnyEvent/REST/Server.pm  view on Meta::CPAN


    $self->{connections}{$id}{handle}->push_write($response);
}

sub send_not_found {
    shift->send(shift, 404, {}, '');
}

1;

 view all matches for this distribution


AnyEvent-RFXCOM

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

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


AnyEvent-RabbitMQ

 view release on metacpan or  search on metacpan

share/fixed_amqp0-8.xml  view on Meta::CPAN

</constant>
  <constant name="access refused" value="403" class="soft error">
  The client attempted to work with a server entity to which it has
  no  due to security settings.
</constant>
  <constant name="not found" value="404" class="soft error">
  The client attempted to work with a server entity that does not exist.
</constant>
  <constant name="resource locked" value="405" class="soft error">
  The client attempted to work with a server entity to which it has
  no access because another client is working with it.

share/fixed_amqp0-8.xml  view on Meta::CPAN

    state.
    </doc>
        <rule implement="MUST">
          <test>amq_exchange_05</test>
      If set, and the exchange does not already exist, the server MUST
      raise a channel exception with reply code 404 (not found).
    </rule>
      </field>
      <field name="durable" type="bit">
    request a durable exchange
    <doc>

share/fixed_amqp0-8.xml  view on Meta::CPAN

    state.
    </doc>
        <rule implement="MUST">
          <test>amq_queue_05</test>
      If set, and the queue does not already exist, the server MUST
      respond with a reply code 404 (not found) and raise a channel
      exception.
    </rule>
      </field>
      <field name="durable" type="bit">
    request a durable queue

share/fixed_amqp0-8.xml  view on Meta::CPAN

      name in this method is empty, the server MUST raise a connection
      exception with reply code 530 (not allowed).
    </doc>
    <doc name = "rule" test = "amq_queue_26">
      If the queue does not exist the server MUST raise a channel exception
      with reply code 404 (not found).
    </doc>
  </field>

  <field name="exchange" domain="exchange name">
          The name of the exchange to bind to.
          <rule implement="MUST">
          <test>amq_queue_14</test>
      If the exchange does not exist the server MUST raise a channel
      exception with reply code 404 (not found).
    </rule>
      </field>
      <field name="routing key" type="shortstr">
     message routing key
    <doc>

 view all matches for this distribution


AnyEvent-Redis-RipeRedis

 view release on metacpan or  search on metacpan

t/tlib/Test/RedisRunner.pm  view on Meta::CPAN

package Test::RedisRunner;

use strict;
use warnings;

our $VERSION = '0.1404';

use File::Temp;
use POSIX qw( SIGTERM WNOHANG );
use Time::HiRes qw( sleep );
use Carp;

 view all matches for this distribution


AnyEvent-RipeRedis

 view release on metacpan or  search on metacpan

t/tlib/Test/RedisRunner.pm  view on Meta::CPAN

package Test::RedisRunner;

use strict;
use warnings;

our $VERSION = '0.1404';

use File::Temp;
use POSIX qw( SIGTERM WNOHANG );
use Time::HiRes qw( sleep );
use Carp;

 view all matches for this distribution


AnyEvent-SNMP-TrapReceiver

 view release on metacpan or  search on metacpan

t/01-listen.t  view on Meta::CPAN

        },
    );
	my $port = (unpack_sockaddr_in($trapd->{server}->{fh}->sockname))[0];
	my $client = IO::Socket::INET->new(PeerHost => 'localhost', PeerPort => $port, Proto => 'udp');
    # hard coded v2c trap
    my $raw = pack( 'H*', '3041020101040464656d6fa7360204779778cc0201000201003028300e06082b06010201010300430203d43016060a2b06010603010104010006082b06010603010101');
	send $client, $raw, 0;
	is( $cv->recv->{oid}{'1.3.6.1.2.1.1.3.0'}, 980, "Verify v2c trap content");
}

{

t/01-listen.t  view on Meta::CPAN

        },
    );
	my $port = (unpack_sockaddr_in($trapd->{server}->{fh}->sockname))[0];
	my $client = IO::Socket::INET->new(PeerHost => 'localhost', PeerPort => $port, Proto => 'udp');
    # hard coded v1 trap
    my $raw = pack( 'H*', '3034020100040464656d6fa429060357060840047f000001020101020101430400e268ea3010300e06032b0601040761626364656667');
	send $client, $raw, 0;
    ok( $cv->recv->{oid}{'1.3.6.1'} eq 'abcdefg', "Verify v1 trap content");
}

done_testing;

 view all matches for this distribution


AnyEvent-SerialPort

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

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


AnyEvent-SparkBot

 view release on metacpan or  search on metacpan

lib/AnyEvent/HTTP/Spark.pm  view on Meta::CPAN

      $self->agent->run_next;
    };
  } else {
    $wrap=sub {
      my ($self,$id,$result,undef,$response)=@_;
      return $cb->(@_) if $result || !(($response->code==429 || $response->code==404) &&  $count-- >0);
      my $timeout=looks_like_number($response->header('Retry-After')) ? $response->header('Retry-After') : $self->retryTimeout;
      $self->log_warn("Request: $id recived a 429 response, will retry in $timeout seconds");

      if($count>0)  {
	my $ae;

 view all matches for this distribution


AnyEvent-WebSocket-Server

 view release on metacpan or  search on metacpan

t/error.t  view on Meta::CPAN

            my $server_handle = AnyEvent::Handle->new(
                fh => $server_fh,
                on_error => sub { fail("server handle error: $_[2]") },
            );
            my $send_response =
                "HTTP/1.1 404 Not Found\r\n" .
                "Connection: close\r\n" .
                "Content-Type: text/plain\r\n" .
                "Content-Length: 9\r\n" .
                "\r\n".
                "Not Found";

 view all matches for this distribution


AnyEvent-XMPP

 view release on metacpan or  search on metacpan

lib/AnyEvent/XMPP/Error/MUC.pm  view on Meta::CPAN

=item room_locked

Entering a room Inform user that the room does not exist and someone
is currently creating it.

(Condition: item-not-found, Code: 404)

=item room_not_creatable

Entering a room Inform user that room creation is restricted

 view all matches for this distribution


AnyEvent

 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


AozoraBunko-Checkerkun

 view release on metacpan or  search on metacpan

author/cp932-utf8.txt  view on Meta::CPAN

U+00E3FF: 
U+00E400: 
U+00E401: 
U+00E402: 
U+00E403: 
U+00E404: 
U+00E405: 
U+00E406: 
U+00E407: 
U+00E408: 
U+00E409: 

 view all matches for this distribution


( run in 2.203 seconds using v1.01-cache-2.11-cpan-788537b7465 )