Skip to content

Instantly share code, notes, and snippets.

View JaSei's full-sized avatar

Jan Seidl JaSei

  • Energostack
  • Praha
View GitHub Profile
@JaSei
JaSei / gist:52cb488ded7ff200d8ec626c6bdcdf21
Last active November 30, 2020 09:24
(go-jira + fzf + pygmentize) v0.1.0
# jira - https://github.com/go-jira/jira
#alt-o open issue in browser
#alt-e edit ticket
#alt-c close ticket
#enter/ctrl-c close fzf
jira view $(jira list -l 1000 -q "project=SCAV AND resolution=unresolved" | fzf -d":" --preview "jira view {1} | pygmentize -l yaml -O style=solarizeddark" --bind="alt-o:execute-silent(jira browse {1}),alt-e:execute(jira edit {1} < /dev/tty > /dev/tto),alt-c:execute(jira close {1})" | cut -d: -f1)
@JaSei
JaSei / test_docker_port.pl
Created December 13, 2016 22:06
script for cross check of iptables and container inspect
use strict;
use warnings;
use JSON qw(decode_json);
my %iptables;
foreach my $iptables_row (qx(iptables -L -n -t nat | grep DNAT)) {
if ($iptables_row =~ /dpt:(\d+)\s+to:([\d\.]+)/) {
my $port = $1;
my $ip = $2;
@JaSei
JaSei / perl
Created September 14, 2015 21:43
activestates perl in cygwin
#!/bin/bash
cyg_args () {
for i in $@
do
if [ -e "$i" ]; then
echo $(cygpath -w "$i")
elif [[ $i == "-"* ]]; then
echo $i
else
@JaSei
JaSei / find_dependency_and_install.pl
Created April 23, 2015 14:43
find used modules and install via ppm
#!/usr/bin/env perl
use strict;
use warnings;
use feature qw(say);
use Module::CoreList;
use File::Next;
use HTTP::Tiny;
use JSON;
use Path::Tiny;
@JaSei
JaSei / statsite
Last active December 26, 2015 22:29
/etc/init.d/statsite on centos
#!/bin/sh
# chkconfig: 2345 95 20
# description: statsite daemon
# processname: statsite
. /etc/rc.d/init.d/functions
exec="/root/statsite/statsite-master/statsite"
pidfile="/var/run/statsite.pid"
CONFIG="/etc/statsite.conf"