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 strict; | |
use warnings; | |
use Data::Dump::Color; | |
use File::Basename; | |
use Getopt::Long; | |
use JSON::PP; | |
use Cwd 3.75 qw(abs_path); | |
use Time::HiRes qw(time); |
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 strict; | |
use warnings; | |
use Data::Dump::Color; | |
use Getopt::Long; | |
use JSON; | |
my ($all,$pretty,$create,$remove,$ssid,$site_id,$pwd); |
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
// https://github.com/rweather/arduinolibs/tree/master/libraries/Crypto | |
#include <SHA256.h> | |
#define HASH_SIZE 32 // Bytes | |
#define LED_PIN 2 // LED pin to blink while we crunch SHA256 | |
#define debug 0 | |
// SHA256 via C++ char strings (much faster than Arduino Strings) | |
char *sha256hex(const char *input, char *outhex) { | |
SHA256 hash; |
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
<?php | |
// Create the client object | |
// $url = "https://scott.internal.web-ster.com/api/json-rpc/"; | |
// $j = new jsonrpc_client($url); | |
// Run the echo_data() function | |
// $a = $j->echo_data('one','two'); | |
// if $a === null, there was some sort of error |
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
import sys | |
# Make sure we have enough arguments to start | |
if len(sys.argv) != 3: | |
print("Usage: %s [base] [Sekrit Message]" % sys.argv[0]) | |
exit() | |
# Print out the letter base, and build the dictionary | |
dict = {} | |
for i in range(1,27): |
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 | |
################################################### | |
# Scott Baker - 2008-03-06 | |
# Released under the GPLV3 | |
# | |
# A simple script to roll dice, or multiple dice | |
# Example: Roll two d20 and add 10 | |
# ./dice_roll.pl 2d20+10 | |
# |
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 strict; | |
use warnings; | |
use Data::Dump::Color; | |
use Date::Parse; | |
############################################################################### | |
############################################################################### |
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 | |
# Turn on super debug mode | |
#set -x | |
for i in "$@" | |
do | |
# Store the current directory | |
od=$PWD | |
#a=$(mktemp --directory) && cd $a |
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 Data::Dump::Color; | |
use File::Basename; | |
use strict; | |
use warnings; | |
my @profiles = ( | |
# VideoBW, AudioBW, VideoHeight |
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 | |
######################################################################## | |
# This script runs tcpdump on a specific NIC (defaults to eth1) and | |
# parses the output from that to calculate the top talked, both send | |
# and receive. After X second it will output who the top talkers were | |
# and continue to calculate | |
# | |
# Scott Baker - 2009-07-31 | |
######################################################################## |
NewerOlder