Skip to content

Instantly share code, notes, and snippets.

Avatar

Moritz Onken monken

View GitHub Profile
View gist:1535522
use Net::RabbitMQ;
use strict;
use warnings;
use JSON::XS;
use IPC::Run3;
my $mq = Net::RabbitMQ->new();
$mq->connect( "localhost", {} );
$mq->channel_open(1);
$mq->consume( 1, "myapp.jobs", { no_ack => 0 } );
View gist:1535321
curl -XPOST aws.netcubed.de/pdf -d '{"url":"https://metacpan.org/module/Moose"}'
View gist:1535250
package MyApp::Controller;
use Moose;
use IO::All;
use JSON::XS;
use Plack::Response;
use MIME::Base64 qw(encode_base64url decode_base64url);
has [qw(model req res)] => ( is => 'ro' );
sub run {
View gist:1534750
package MyApp::Model;
use Moose;
use JSON::XS;
use AnyEvent::RabbitMQ;
use MooseX::ClassAttribute;
class_has queue => ( is => 'ro', builder => '_build_queue' );
has _channel => ( is => 'rw' );
sub _build_queue {
my $self = shift;
View gist:1383972
\newcommand{\iflrecht}[2]{
\thispagestyle{empty}
\
\vfill
Ich versichere hiermit wahrheitsgem"a"s, die Arbeit bis auf die dem
Aufgabensteller bereits bekannte Hilfe selbst"andig angefertigt, alle
benutzten Hilfsmittel vollst"andig und genau angegeben und alles kenntlich
gemacht zu haben, was aus Arbeiten anderer unver"andert oder mit
Ab"anderung entnommen wurde.\\
View gist:1379220
package MyTest;
use Moose;
use MooseX::Types::Moose qw(ArrayRef);
use MooseX::Types::Structured qw(Dict);
use MooseX::Types -declare => [qw(Person)];
subtype Person, as Dict [ friends => ArrayRef [Person] ];
View gist:1315785
# doesn't work
curl -XGET api.metacpan.org/v0/release/_search -d '{
"query" : {
"nested" : {
"filter" : {
"term" : {
"depedency.module" : "Moose"
}
},
View gist:1304013
plu: [08:20:24] https://metacpan.org/module/ABRAXXA/DBIx-Class-0.08193/lib/DBIx/Class.pm
[07:57] plu: [08:20:31] "See DBIx::Class::ResultSource for docs on defining result classes."
[07:57] plu: [08:21:02] See L<DBIx::Class::ResultSource> for docs on defining result classes.
[07:57] plu: [08:21:13] this links to https://metacpan.org/module/DBIx::Class::ResultSource
[07:57] plu: [08:21:44] if I'm browsing a specific version of a module, I'd expect the links to go to that version as well, if it's in the same namespace
[07:57] plu: [08:22:42] SCO is doing that too
[07:57] plu: [08:29:52] couldnt find anything in the github issues list
[07:57] plu: [08:30:03] if my request is reasonable, I'll open an issue, just let me know
View gist:1302231

Diese Tour stellt ein mögliches Individuum im Lösungsraum dieses TSP dar, genau wie die (ebenfalls willkürlich ausgewählte) Tour $[1, 5, 7, 6, 4, 3, 8, 2]$ oder beliebige andere Permutationen der 8 Kunden. Zusammen bildet eine Menge solcher zulässigen Lösungen eine \textit{Population}. Die \textit{Fittness} jedes Individuums kann außerdem durch eine \textit{Fittnessfunktion} bestimmt werden, in diesem Beispiel repräsentiert durch den Zielfunktionswert, bzw. der Länge der Touren.

Ausgehend von solch einer initialen Population besteht die Vorgehensweise eines genetischen Algorithmus nun, wie in Abbildung \ref{genetische_algorithmen_flow_chart} dargestellt, aus vier Phasen, die bis zu einem vorher definierten Abbruchkriterium (z.B. eine maximale Anzahl an Iterationen) durchlaufen werden. Im ersten Schritt werden die Individuen der aktuellen Population herausselektiert, die an der Reproduktion der nächsten \textit{Generation} beteiligt sein sollen. Danach folgt die eigentliche Reproduktion, die aus einer Rekombi

View gist:1258738
#!/bin/sh
#
### BEGIN INIT INFO
# Provides: metacpan-web
# Required-Start: $ALL
# Required-Stop:
# Default-Start: 3 5
# Default-Stop: 0 1 2 6
# Short-Description: MetaCPAN Front-End
### END INIT INFO