Skip to content

Instantly share code, notes, and snippets.

View petersohn's full-sized avatar

Péter Szabados petersohn

  • Tresorit
  • Hungary
View GitHub Profile
@petersohn
petersohn / gist:b7e3477cbafe12430d40035eac75a992
Created January 15, 2024 21:11
Userscript for TVTropes quoteblock to forum posts
// ==UserScript==
// @name Quoteblock to forum posts
// @namespace http://tampermonkey.net/
// @version 2024-01-15
// @description Add [[quoteblock]]/[[/quoteblock]] widget to forum post editor.
// @author You
// @match https://tvtropes.org/pmwiki/addpost.php*
// @icon https://www.google.com/s2/favicons?sz=64&domain=tvtropes.org
// @grant none
// ==/UserScript==
@petersohn
petersohn / facts.py
Last active September 30, 2023 20:50
Calendar Facts
#!/usr/bin/env python3
# Data source: https://xkcd.com/1930/
import random
import re
class Or(list):
def __init__(self, *args):
#!/usr/bin/python
from HTMLParser import HTMLParser
import re
import io
import sys
import datetime
import time
import httplib
from argparse import ArgumentParser
#!/usr/bin/perl
my $titlepage = `wget -O - -o download.log http://www.giantitp.com/comics/oots.html`;
my %titles;
while ($titlepage =~ m'<A href="/comics/oots(\d+)\.html">([^<]*)</A>'sg) {
print "$1 $2\n";
$titles{$1} = $2;
}
LOOP:foreach my $num (sort keys %titles) {
my @existingFile = glob "$num*";