when /^</
                        classes = token.scan(/^<([^>]+)>$/)[0][0].split(/\./)
                        list = []
                        begin
                                list.push(classes.join('_'))

                {        name = 'meta.group.named.regexp';
                        begin = '(\()(\?<)([a-z](\w*)>)';
                        end = '(\))';
                        beginCaptures = { 
                                1 = { name = 'keyword.control.group.regexp';};

                {        name = 'meta.group.named.regexp';
                        begin = '(\()(\?<)([a-z](\w*)>)';
                        end = '(\))';
                        beginCaptures = { 
                                1 = { name = 'keyword.control.group.regexp';};

<?php

        $factor = 327;
    $base = 0x9762;

<?php

        $factor = 3451;
    $base = 0x43759762;

        function simple_obfuscate ($i) {
                global $factor, $base;
                $res = ($i * $factor) ^ $base;
                $right = $res & 0xFFFF;
                $left = (($res ^ $left) >> 16) ^ $right;

def convert_number_to_words(number, word_list)
  base = word_list.length
  res = []
  until number < base
    remainder = number % base

#!/usr/local/bin/ruby -w



require "enumerator"

#!/usr/bin/env ruby

require '/Applications/TextMate.app/Contents/SharedSupport/Support/lib/plist'

ARGV.each do |file|

`date`
foo.mapwi

require "open3"
require 'cgi'

def esc(str)
  CGI.escapeHTML(str).gsub(/\n/, '<br>')

  def esc_sh
    # self.gsub(/[{}()`'"\\; $<>&]/, '\\\\\&')
    self.gsub(/[^a-zA-Z0-9_.]/, '\\\\\&')
  end

On Tue, 17 May 2005 14:44:41 +0200, Luc Heinrich wrote:

>   CFIndex idx, cnt;
>   char **args = *_NSGetArgv();
>   cnt = *_NSGetArgc();

    /* Modifier keys: start with C-m */
    "^m" = {
        "^e"    = ("insertText:", "\U21A9");        /* C-e          return */
        "e"     = ("insertText:", "\U2305");        /* e            enter */

        if([self shouldChangeTextInRange:selectedRange replacementString:newString])
        {
                if(!hadSelection)
                        [self setSelectedRange:NSMakeRange(0, [[self textStorage] length])];
                [self insertText:newString];