This file contains 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
¯ | |
{ | |
bidi => "ON", | |
block => "Latin-1 Supplement", | |
category => "Sk", | |
code => "00AF", | |
combining => 0, | |
comment => "", | |
decimal => "", | |
decomposition => "<compat> 0020 0304", |
This file contains 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 | |
use v5.20; | |
use feature 'signatures'; | |
use AnyEvent; | |
use AnyEvent::HTTP; | |
use AnyEvent::HTTPD; | |
use JSON::XS; | |
use URI; |
This file contains 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 | |
use AnyEvent; | |
use AnyEvent::I3 ":all"; | |
my $i3 = i3(); | |
$i3->connect->recv or die "Error connecting"; | |
my $direction = shift or die "need direction"; | |
my $cv = AE::cv; |
This file contains 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 | |
use AnyEvent; | |
use AnyEvent::I3 ":all"; | |
my $i3 = i3(); | |
$i3->connect->recv or die "Error connecting"; | |
my $command = join(" ", @ARGV) or die "need command"; | |
my $cv = AE::cv; |
This file contains 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
#!/bin/bash | |
RED='\033[0;31m' | |
GREEN='\033[0;32m' | |
NC='\033[0m' | |
for dir in $(find "$1" -maxdepth 1 -type d); do | |
if [ -d "$dir/.git" ]; then | |
dirty=$(git -C "$dir" diff --shortstat 2> /dev/null | tail -n 1) | |
if [[ $dirty != "" ]]; then |
This file contains 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 _serverName { | |
my $self = shift; | |
my $row = shift; | |
return (length($row->{'inventory_tag'}) | |
? $row->{'inventory_tag'} | |
: (length($row->{'hostname'}) | |
? $row->{'hostname'} | |
: (length($row->{'rack_id'}) | |
? $row->{'rack_id'} | |
: (length($row->{'nickname'}) |
This file contains 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/perl | |
use Regexp::Grammars; | |
use File::Slurp; | |
use Data::Dump qw/dump/; | |
my $config = read_file $ARGV[0]; | |
my $parser = qr{ | |
<[Item]>+ |
This file contains 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
onCmdC: function(event) { | |
if (!this.activeWindow.input.focused) { | |
this.activeWindow.input.cancelNextFocus(); | |
} | |
}, | |
onCmdK: function() { | |
this.activeWindow.messages.update(""); | |
this.activeWindow.lastNick = ""; | |
}, |
This file contains 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 seed | |
Gtk = imports.gi.Gtk; | |
Glib = imports.gi.GLib; | |
WebKit = imports.gi.WebKit; | |
os = imports.os; | |
Gtk.init(Seed.argv); | |
window = new Gtk.Window({title: "Alice"}); |
This file contains 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
$$('head script[src]').findAll(function(s) { | |
return s.src.match(js); | |
}).each(function(s) { | |
var params = s.src.match(js)[1]; | |
params.split("&").each(function(o) { | |
var kv = o.split("="); | |
options[kv[0]] = kv[1]; | |
}); | |
}); |
OlderNewer