John Napiorkowski jjn1056
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
| { | |
| name => 'John', | |
| age => '52', | |
| address => { | |
| street => "15604 Harry Lind Road", | |
| zip => "78621", | |
| }, | |
| email => ['jjn1056@gmail.com', 'jjn1056@yahoo.com'], | |
| credit_cards: [ |
jjn1056
/ gist:730946690347e7e2a9eb59fa87685e78
Created
October 2, 2020 15:15
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
| $ PERL_MM_USE_DEFAULT=1 cpanm --reinstall --verbose Crypt::SSLeay | |
| cpanm (App::cpanminus) 1.7044 on perl 5.028001 built for darwin-2level | |
| Work directory is /Users/jnapiorkowski/.cpanm/work/1601651704.14365 | |
| You have make /usr/bin/make | |
| You have LWP 6.49 | |
| You have /usr/bin/tar: bsdtar 2.8.3 - libarchive 2.8.3 | |
| You have /usr/bin/unzip | |
| Searching Crypt::SSLeay () on cpanmetadb ... | |
| --> Working on Crypt::SSLeay | |
| Fetching http://www.cpan.org/authors/id/N/NA/NANIS/Crypt-SSLeay-0.72.tar.gz ... OK |
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
| $ openssl version -a | |
| OpenSSL 1.1.1g 21 Apr 2020 | |
| built on: Tue Apr 21 13:28:37 2020 UTC | |
| platform: darwin64-x86_64-cc | |
| options: bn(64,64) rc4(16x,int) des(int) idea(int) blowfish(ptr) | |
| compiler: clang -fPIC -arch x86_64 -O3 -Wall -DL_ENDIAN -DOPENSSL_PIC -DOPENSSL_CPUID_OBJ -DOPENSSL_IA32_SSE2 -DOPENSSL_BN_ASM_MONT -DOPENSSL_BN_ASM_MONT5 -DOPENSSL_BN_ASM_GF2m -DSHA1_ASM -DSHA256_ASM -DSHA512_ASM -DKECCAK1600_ASM -DRC4_ASM -DMD5_ASM -DAESNI_ASM -DVPAES_ASM -DGHASH_ASM -DECP_NISTZ256_ASM -DX25519_ASM -DPOLY1305_ASM -D_REENTRANT -DNDEBUG | |
| OPENSSLDIR: "/usr/local/etc/openssl@1.1" | |
| ENGINESDIR: "/usr/local/Cellar/openssl@1.1/1.1.1g/lib/engines-1.1" |
jjn1056
/ gist:bd2871293156435dcbd1b24a4f31c220
Created
June 29, 2020 17:07
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
| ## Template syntax update to allow capture blocks with "sub() {" | |
| % use experimental 'signatures'; | |
| %= formbuilder->form(method => 'POST', sub($fb) { | |
| <fieldset> | |
| <legend>My Test Form</legend> | |
| %= $fb->input(type='text'); | |
| %= $fb->input(type='text'); | |
| </fieldset> | |
| % }); |
jjn1056
/ gist:1aaa8d17bc66a2806b54747abd0a28a7
Created
June 19, 2020 14:33
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
| <div class='form-group'> | |
| %= model_errors_for 'person_roles', max_errors=>1, class=>'alert alert-danger', role=>'alert'; | |
| <fieldset class="border p-2"> | |
| <legend class="w-auto"><%= $model->human_attribute_name('person_roles') %></legend> | |
| %= checkbox_from_related 'person_roles', 'role', label => 1, checkbox_attrs => +{class=>'form-check-input'}, begin | |
| <div class="form-check"> | |
| % my ($checkbox, $label) = @_; | |
| %= $checkbox; | |
| %= $label; | |
| </div> |
jjn1056
/ gist:51514db7e2e4ef5b097e80190a64055b
Created
June 8, 2020 14:11
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
| if(0) { | |
| use Devel::Dwarn; | |
| Dwarn $c->req->_body; | |
| my $new = (); | |
| my %params = %{$c->req->body_parameters||+{}}; | |
| Dwarn \%params; | |
| my $current_path; |
jjn1056
/ gist:7d45f9282821018b9d8018deb0675c1b
Created
May 19, 2020 13:05
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 $model = $c->model('Schema::Person')->new_result(+{}); | |
| my $cc = $c->model('Schema::CreditCard')->new_result(+{}); | |
| $model->credit_card_rs($cc, $cc, $cc); # This gives "DBIx::Class::ResultSet::search_rs(): Odd number of arguments to search" | |
| $model->add_to_credit_card_rs($cc); # "DBIx::Class::ResultSource::_resolve_relationship_condition(): Argument to infer_values_based_on must be a hash " | |
jjn1056
/ example_helper.pm
Created
May 4, 2020 02:26
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
| ## These last two are experimental; expect them to be removed at some point | |
| ## so don't rely on them in your code. | |
| form => sub { | |
| my ($self, $c, $model, @proto) = @_; | |
| my ($inner, %attrs) = (pop(@proto), @proto); | |
| my $attrs = join ' ', map { "$_='$attrs{$_}'"} keys %attrs; | |
| LOCAL_TO_FORM: { | |
| # Do we need a stack so we can refer to the parent or not...? | |
| my @model_stack = ( |
jjn1056
/ gist:7a270e429830a060662f134e88569252
Created
April 19, 2020 18:46
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
| t/basic.t .. # Can't initialize a schema with the given configuration | |
| # Returned Error: {UNKNOWN}: {UNKNOWN}: Inconsistent hierarchy during C3 merge of class 'Component': | |
| # current merge results [ | |
| # Component, | |
| # ] | |
| # merging failed on 'DBIx::Class' at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Moo.pm line 150. | |
| # Compilation failed in require at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Class/C3/Componentised.pm line 146. at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Class/C3/Componentised.pm line 151 | |
| # Compilation failed in require at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Class/C3/Componentised.pm line 146. at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Class/C3/Componentised.pm line 151 | |
| # Compilation failed in require at /Users/jnapiorkowski/.perlbrew/libs/perl-5.28.1@default/lib/perl5/Module/Runtime.pm line 314. | |
| # configuration: { |
jjn1056
/ gist:15f7f9083b0a6f0a9fcfdf560c4cfe9a
Created
April 19, 2020 18:22
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
| $ prove -lvr t/basic.t | |
| t/basic.t .. | |
| ok 1 | |
| ok 2 | |
| Can't locate object method "attribute_specs" via package "Method::Generate::Constructor" at /Users/jnapiorkowski/Desktop/DBIx-Class-MooResultClass/lib/DBIx/Class/MooResultClass.pm line 14. | |
| # Tests were run but no plan was declared and done_testing() was not seen. | |
| # Looks like your test exited with 255 just after 2. | |
| Dubious, test returned 255 (wstat 65280, 0xff00) | |
| All 2 subtests passed |