protospork

J:\TV\Firefly>perl "X:\My Dropbox\Public\misc\perl\TEST\hash_race.pl"
Firefly 01e01 - Serenity.mkv:
umVYlZ3zaRKC4roLsZNBuw || 7 secs
21C77314 || 3 secs
umVYlZ3zaRKC4roLsZNBuw || 2 secs
21C77314 || 2 secs
Firefly 01e02 - The Train Job.mkv:
BN9w8Ybicy+4CEqXVJYImg || 4 secs
A64E6AE5 || 2 secs
BN9w8Ybicy+4CEqXVJYImg || 1 secs

protospork

// ==UserScript==
// @id             wk-dashboard-forum-hide
// @name           WaniKani: hide irrelevant forums
// @version        1.1
// @namespace      
// @author         protospork
// @description    
// @include        https://www.wanikani.com/dashboard
// @require        https://ajax.googleapis.com/ajax/libs/jquery/1.9.1/jquery.min.js
// @run-at         document-idle

protospork

//The x-component of tc indicates the position along the waveform. 
//0.0 is snugly against the left side of the window, 1.0 is to the far right of the window. 
//In the PS (pixel shader), a tc.x of 0.25 would be 25% from the left side of the window.

//The y-component of tc indicates at what absolute signal level the top and bottom of the window is at. 
//The default of 1.0 makes the vertical range of the window from -fullscale to +fullscale.

//The pixel shader function runs once for every pixel (fragment) of the window, 
//with the parameters interpolated from the values set in the corners by the vertex shader.

protospork

#source: http://www.binrand.com/post/469178-crc-use-strict-use-warnings-use-string-crc32-use-xchat-qw.html (13-Oct-2012)
# I don't know who posted this there, but all I did was change the file open syntax (protospork)

use strict;
use warnings;
use String::CRC32;
use Xchat qw( :all );

register('CRC Check Script', '1.0', 'Check CRC');

protospork

#!C:\perl\perl\bin

# sudo apt-get install libmodern-perl-perl libstring-crc32-perl

use Modern::Perl;
use String::CRC32;
my $sil = 0;
my $debugmode = 0;
my $start = time;
my @files;

protospork

#!/usr/bin/perl
use Modern::Perl;
use File::MMagic;

# This script uses MAGIC (numbers) to rename images to have proper extensions. 
# (Okay, so it just calls a module to do it)
# There's a unix hashbang up there but I'm only testing this in windows (strawberry perl 5.12)

# INSTALL:
# Step 1: 

protospork

#this doesn't work for me in cygwin irssi 0.8.15-2, but it works for others

use LWP;
use Irssi;
use vars qw{$VERSION %IRSSI};

$VERSION = 0.01;
%IRSSI = (
    authors => 'protospork',
    name => 'MPC',