This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
{ | |
'Model::User' => [ | |
-inject => { | |
class=>'MyApp::User', | |
scope=>'Request', | |
method=>'new', | |
}, | |
request { -ctx => '$request' } | |
name => { -model => 'Foo' }, | |
], |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
my $schema = MyApp::Schema->connect(...); | |
my $user_rs = $schema->resultset('User'); | |
my @results = $user_rs | |
->ready_p(sub { | |
my ($rs) = @_; | |
$rs->search({id=>1}) | |
})->then(...) | |
->await; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
sub latest_posts ($self) { | |
$self->Q->published_posts | |
->include_author | |
->latest(10) | |
->hashes->all; | |
} | |
same as ??? | |
select |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
# IMPORTANT: if you delete this file your app will not work as | |
# expected. You have been warned. | |
use inc::Module::Install 1.02; | |
use Module::Install::Catalyst; # Complain loudly if you don't have | |
# Catalyst::Devel installed or haven't said | |
# 'make dist' to create a standalone tarball. | |
name 'Test'; | |
all_from 'lib/Test.pm'; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package Adama::Model::Feature; | |
use strict; | |
use warnings; | |
use Adama::Util::LaunchDarkly; | |
use Moo; | |
use Catalyst::Utils; | |
extends 'Catalyst::Model'; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
jjn@ip-172-31-48-121:~$ sudo service retreatcenter status | |
[sudo] password for jjn: | |
● retreatcenter.service - LSB: retreatcenter | |
Loaded: loaded (/etc/init.d/retreatcenter; generated) | |
Active: active (running) since Fri 2018-10-12 07:13:37 PDT; 46s ago | |
Docs: man:systemd-sysv-generator(8) | |
Process: 738 ExecStart=/etc/init.d/retreatcenter start (code=exited, status=0/SUCCESS) | |
Tasks: 6 (limit: 2362) | |
CGroup: /system.slice/retreatcenter.service | |
├─ 841 perl-fcgi-pm [RetreatCenter] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
jjn@ip-172-31-48-121:~$ cat /var/www/cpan-lib/bin/localenv | |
#!/var/www/perl5.26.2/bin/perl | |
use strict; | |
use warnings; | |
use lib '/var/www/cpan-lib/lib/perl5'; | |
use local::lib '/var/www/cpan-lib'; | |
unless ( caller ) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
jjn@ip-172-31-48-121:sudo service retreatcenter status | |
● retreatcenter.service - LSB: retreatcenter | |
Loaded: loaded (/etc/init.d/retreatcenter; generated) | |
Active: active (running) since Fri 2018-10-12 06:38:46 PDT; 8min ago | |
Docs: man:systemd-sysv-generator(8) | |
Process: 739 ExecStart=/etc/init.d/retreatcenter start (code=exited, status=0/SUCCESS) | |
Tasks: 7 (limit: 2362) | |
CGroup: /system.slice/retreatcenter.service | |
├─ 820 sh -c PATH=/var/www/perl5.26.2/bin DBI_DSN="dbi:mysql:reg2" /var/www/cpan-lib | |
├─ 824 perl-fcgi-pm [RetreatCenter] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
jjn@ip-172-31-48-121:~$ cat /usr/local/bin/retreatcenter-fcgi-daemon | |
#!/var/www/perl5.26.2/bin/perl | |
use warnings; | |
use strict; | |
use lib '/var/www/cpan-lib/lib/perl5'; | |
use Daemon::Control; | |
my $app_home = '/var/www/src'; | |
my $name = 'retreatcenter'; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
jjn@ip-172-31-48-121:~$ sudo cat /etc/init.d/retreatcenter | |
#!/bin/sh | |
# Generated at Fri Oct 12 06:37:13 2018 with Daemon::Control 0.001008 | |
### BEGIN INIT INFO | |
# Provides: retreatcenter | |
# Required-Start: $nginx | |
# Required-Stop: $nginx | |
# Default-Start: 2 3 4 5 |