Skip to content

Instantly share code, notes, and snippets.

View wchristian's full-sized avatar

Christian Walde (Mithaldu) wchristian

View GitHub Profile
my $instance;
sub BUILD {
my( $self ) = @_;
$instance = $self;
}
sub instance {
my ( $class ) = @_;
Mithaldu@XENBOX /cygdrive/c/UDAG/vendorbox
$ /usr/bin/gdb --args perl -d faa.pl
GNU gdb (GDB) (Cygwin 11.2-1) 11.2
Copyright (C) 2022 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.
Type "show copying" and "show warranty" for details.
This GDB was configured as "x86_64-pc-cygwin".
Type "show configuration" for configuration details.
* { font-family: Tahoma !important }
a[href$="mithaldu/following"] { display: none; }
a[href$="mithaldu/followers"] { display: none; }
.r-ttdzmv, .r-19urhcx { padding-top: 0px }
.r-kzbkwu { padding-bottom: 0px }
.r-1s2bzr4 { margin-top: 0px }
.r-6gpygo { margin-bottom: 0px }
package Moose::Meta::Protect;
use strictures 2;
use Package::Stash;
use Module::Runtime 'use_module';
use Exporter 'import';
our @EXPORT_OK = qw( protect_modifiers );
Devel::Cover: getting BEGIN block coverage
Devel::Cover: 100% - 0s taken
Devel::Cover: getting CHECK block coverage
Devel::Cover: 100% - 0s taken
Devel::Cover: getting END/INIT block coverage
Devel::Cover: 100% - 0s taken
Devel::Cover: getting CV coverage
Devel::Cover: 0% unexpected OP_PUSHMARK at /usr/share/perl5/5.32/B/Deparse.pm line 1664.
B::Deparse::AUTOLOAD(B::Deparse=HASH(0x8010a17d0), B::OP=SCALAR(0x8010a1e90), 0.5) called at /usr/share/perl5/5.32/B/Deparse.pm line 1066
B::Deparse::deparse(B::Deparse=HASH(0x8010a17d0), B::OP=SCALAR(0x8010a1e90), 0.5) called at /home/Mithaldu/perl5/lib/perl5/x86_64-cygwin-threads-multi/Devel/Cover.pm line 1018
sub update_memory_use {
require Win32::OLE;
import Win32::OLE qw(in);
my @state_array;
my $pid = $PROCESS_ID;
my $sleep_time = 2;
my $small_sleep_time = 0.1;
sleep $small_sleep_time while ( !$config_loaded );
package DBIx::Class::Storage::DBI::mysql_query_thief;
# oh black rock shooter~
use precise;
use DBIx::Class::ResultSet;
use parent 'DBIx::Class::Storage::DBI::mysql';
use Test::More;
use strictures 2;
use 5.012;
use Future;
sub async_task {
Future
->done
->then( sub {
return "meep";
} )

[19:32] Mithaldu: and denying the validity of xenogender is doing a transphobic thing

[19:33] Mithaldu: and that is objectively so because, as we both know, there is a variety of named non-binary genders in existence already

[19:33] enny: I heavily disagree. you're basically saying we have to own the attack helicopter meme.

[19:33] Mithaldu: nope

[19:34] Mithaldu: because the question of sincerity comes in, and of course, the question of whether the identity in question is truly evolved in a temporal feedback loop from the historic distinction of sexes

24024-43
4THOT
Adariano
Amalyze
Azgerod
BardenHasACamera
Big_Swingin_Nick
Blamous
BlueSeekz
Copy_Of_A_