sburlot

#!/usr/bin/php
# Send SMS messages via Infomaniak.ch
# You need an Infomaniak.ch account and have some credits to send SMS
# Stephan Burlot, http://coriolis.ch Dec, 30 2012
#
<?php

// Username (your email address)
define('USER', 'user@domain.ch');

sburlot

#!/usr/bin/perl

## unban an IP using iptables
## script will display the iptable command to run, it will not delete the rule (if found)

## Usage: ./unban.pl -ip=123.123.123.123

use Getopt::Long;

@LINES = `iptables -L -n`;

sburlot

@property (nonatomic, strong) UITapGestureRecognizer *gesture;

//==========================================================================================
- (void)viewDidAppear:(BOOL)animated
{
    [super viewDidAppear:animated];
    self.gesture = [[UITapGestureRecognizer alloc] initWithTarget:self action:@selector(handleTap:)];
    self.gesture.numberOfTapsRequired = 1;
    self.gesture.numberOfTouchesRequired = 1;
    self.gesture.delegate = self;

sburlot

# from https://gist.github.com/mike3k/4513568
# rd: print a recursive description of views
command regex rd 's/^[[:space:]]*$/po [[[UIApplication sharedApplication] keyWindow] recursiveDescription]/' 's/^(.+)$/po [%1 recursiveDescription]/'
# prect: print the properties of a rect
command regex prect 's/(.+)/print (CGRect)%1/'

sburlot

#!/usr/bin/perl

require WebService::Prowl;

my $oldvalue = "";
my $md5 = "";

$result = `curl -s "https://www.arqbackup.com/download/arq5_release_notes.html" | md5sum`;
($md5, $ignore) = split(/\s/, $result);

sburlot

#!/usr/local/bin/ruby
# fetches the content of an objc.io issue and send it to Instapaper
# Stephan Burlot, Coriolis Technologies, http://www.coriolis.ch
# First version Oct 10, 2013

# ruby was installed via homebrew, so the path to ruby is /usr/local/bin
# you may need to change it to the actual path of your ruby installation.

require 'nokogiri'
require 'open-uri'

sburlot

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<!--
  BBEdit/TextWrangler codeless language module for NXC source files.
	NXC is Not eXactly C, a programming language for the Lego Mindstorms NXT 2.0
	
	Stephan Burlot, Coriolis Technologies
	http://coriolis.ch
	

sburlot

#!/usr/bin/ruby
# monitor the Apple Status page and send a notification when a new service is enabled
# Stephan Burlot, Coriolis Technologies, http://www.coriolis.ch

require 'rubygems'
require 'nokogiri'
require 'open-uri'
require 'yaml'
require 'prowl'

sburlot

#!/usr/bin/perl
#
# Check if we're running for 5.1 deployment and any .xib view has autolayout on.
# 

use File::Find qw(find);

my $deployment = $ENV{'IPHONEOS_DEPLOYMENT_TARGET'};
my $project_dir = $ENV{'PROJECT_DIR'};
print "Deploy to $deployment\n";

sburlot

javascript:(function()%7Bvar%20inputs=document.getElementsByTagName('input');for(var%20i=0;i%3Cinputs.length;i++)%7Bif(inputs%5Bi%5D.getAttribute('type').toLowerCase()==='password')%7Binputs%5Bi%5D.setAttribute('onpaste','');%7D%7D%7D)();