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
#!perl -w | |
# vim: sw=4 ts=4 et : | |
# (C) 2003-2007 Willem Jan Hengeveld <itsme@xs4all.nl> | |
# Web: http://www.xs4all.nl/~itsme/ | |
# http://wiki.xda-developers.com/ | |
# | |
# $Id: $ | |
# | |
# http://en.wikipedia.org/wiki/Linear_regression | |
# http://mathworld.wolfram.com/LeastSquaresFitting.html |
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 -w | |
# (C) 2003-2007 Willem Jan Hengeveld <itsme@xs4all.nl> | |
# Web: http://www.xs4all.nl/~itsme/ | |
# http://wiki.xda-developers.com/ | |
# | |
# $Id$ | |
# | |
# script that transposes a tab separated matrix | |
use strict; |
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 | |
# (C) 2003-2007 Willem Jan Hengeveld <itsme@xs4all.nl> | |
# Web: http://www.xs4all.nl/~itsme/ | |
# http://wiki.xda-developers.com/ | |
# | |
# $Id$ | |
# | |
use strict; | |
# this script decodes urls listed on stdin. |
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 -w | |
# (C) 2003-2007 Willem Jan Hengeveld <itsme@xs4all.nl> | |
# Web: http://www.xs4all.nl/~itsme/ | |
# http://wiki.xda-developers.com/ | |
# | |
# $Id$ | |
# | |
use strict; |
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
use strict; | |
use warnings; | |
use IO::File; | |
sub readbin { | |
my $fn= shift; | |
my $fh= IO::File->new($fn, "r") or die "$fn: $!\n"; | |
binmode $fh; | |
my $data; | |
$fh->read($data, -s $fn); | |
$fh->close(); |
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 -w | |
# (C)2009 Willem Hengeveld itsme@xs4all.nl | |
use strict; | |
use MIME::Base64; | |
local $/; | |
# script to convert macosx .plist xml files to perl, this makes them much more readable | |
# NOTE: there is also "/usr/libexec/PlistBuddy -c Print x.plist" | |
# | |
# |
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 -w | |
use strict; | |
use Compress::Zlib; | |
use Getopt::Long; | |
Getopt::Long::Configure ("bundling"); | |
# xpcap shows the payloads of udp and tcp connections, parsing | |
# the output of tcpdump -x | |
$|=1; |
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 | |
GREPARGS=() | |
FINDPATHS=() | |
while [[ $# != 0 ]]; do | |
if [[ -d "$1" ]]; then | |
FINDPATHS+=("$1") | |
else | |
GREPARGS+=("$1") | |
fi | |
shift |
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
if [[ -z "$1" ]]; then | |
exit 1 | |
fi | |
if [[ -e $1/bin/avr-gcc-7.1.0 ]]; then | |
cppopt=gnu++1z | |
elif [[ -e $1/bin/avr-gcc-4.9.2 ]]; then | |
cppopt=gnu++11 | |
else | |
echo unknown compiler version |
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
""" | |
Python script for finding a still available pretty phonenumber on the sha2017 POC network. | |
Register your phone number on: https://poc.sha2017.org/ | |
Author: Willem Hengeveld <itsme@xs4all.nl> | |
This code is released under the Beerware license. | |
""" | |
from __future__ import print_function |