xnuk

{-# LANGUAGE PackageImports, OverloadedStrings, LambdaCase #-}
module Http2MastodonStream where

import "http2-client" Network.HTTP2.Client
import "data-default-class" Data.Default.Class
import "tls" Network.TLS
import "tls" Network.TLS.Extra.Cipher
import "http2" Network.HTTP2
import "bytestring" Data.ByteString.Char8 (pack)
import qualified "bytestring" Data.ByteString.Char8 as B

xnuk

#!/usr/bin/env ruby
a = File.read("./package.yaml")
by_library = a.split(/(\nlibrary: *\n)/, 2)

by_dependencies = by_library[2].split(/((?:^|\n) +dependencies: *\n)/, 2)

dir = by_library[2].split(/((?:^|\n) +source-dirs: +)/, 2)[2].split("\n", 2)[0].strip

by_dependencies[2] = by_dependencies[2].sub (/^(?:\n?( +)- [^\n]+\n)+/) do |m|
	`rg '^import(?: qualified)? "([^"]+)"' --replace='#{$1}- $1' --only-matching --type=haskell --no-filename --no-config --no-line-number --color=never #{dir} | sort -u`

xnuk

const pk_token = document.getElementsByName('pk_token')[0].value
var dafuq = {}

fetch('https://myk.kbs.co.kr/broadcast_live/channel_master_items_json', {
	method: 'POST',
	body: new URLSearchParams('src_channel_type=&os_type=pc&pk_token=' + pk_token),
	credentials: 'same-origin', // for use cookie
	keepalive: true
}).then(v => v.json()).then(channels =>

xnuk

#!/usr/bin/env ruby
# frozen_string_literal: true

require 'yaml'
require 'net/http'
require 'uri'
require 'find'
require 'set'
require 'optparse'
require 'date'

xnuk

const {parse: crawl, SELECTOR, CONVERT, DATA} = require("crawl-it")
const {get} = require("request")
const {parse: json5} = require('json5')

get("http://m.airkorea.or.kr/sub_new/sub11.jsp", (e, r, b) => {
console.log(crawl(b, {
    [DATA]: 'script/text()',
    [CONVERT]: v => json5('{' +
        v.split('var wrapper;')[0].trim()
            .replace(/var\s+JSONObject([^=]+)=/g,'$1:')

xnuk

// require https://raw.githubusercontent.com/mozilla/readability/master/Readability.js

function uri(x) {
	const a = document.createElement('a')
	a.href = x
	const {href, hostname, pathname, protocol} = a
	return {
		spec: href, host: hostname,
		prePath: protocol + '//' + hostname,
		scheme: protocol.substr(0, protocol.indexOf(':')),

xnuk

#!/usr/bin/perl
use v5.24.0;
use strict;
use warnings;
use autodie;
no warnings 'experimental';

use constant DIR => "$ENV{'HOME'}/.stack/";
my $prevdir = `pwd`;

xnuk

Case [0,0,0,0]: N/A
Case [0,0,0,1]: N/A
Case [0,0,0,2]: N/A
Case [0,0,0,3]: N/A
Case [0,0,0,4]: N/A
Case [0,0,0,5]: N/A
Case [0,0,0,6]: N/A
Case [0,0,0,7]: N/A
Case [0,0,0,8]: N/A
Case [0,0,0,9]: (0+((0^0)+9))=10.0

xnuk

ul[aria-hidden="false"][aria-labelledby="user-dropdown-toggle"]>li.current-user>a:before {
  content: '';
  display: block;
  height: 60px;
  margin-top: -60px;
}

xnuk