Today's amusement - a HTTP 1/1 client in scsh :P

... ) ; let* wp... ) (define (basic-auth username password) (string-append "Authorization: Basic " (base64-encode (string-append username ":" password))) ) (define (decode-hex-string str) (let* ((s1 (string->list (string-downcase str))) (mul 1) (num 0) (zero (char->ascii #\0)) (a (- (char->ascii #\a) 10))) (display (map char->ascii s1)) (for-each (lambda (ch) (set! num (+ num (* mul (if (...

http://vega-33.livejournal.com/648131.html (Cached) 0 links
Published: 4 weeks ago (Thu, 05 Nov 2009 20:52:22 PST); 4586 bytes

vega_33

query-replace-regexp or `` doing movies gratifying ''

... bushel all the broken i ' cases: M-x query-replace-regexp RET \ ( [ ^I ] *\ ) \ ( I+\ ) \ ( [ ^I ] *\ ) RET \1\, ( replace-regexp-in-string `` i '' `` liter '' ( downcase \2 ) ) \3 RET This holded quite few false positives, but it maked 95 % of the work, so I manually doctored the 5-10 cases it maked n't catch, and I was eventually able to savour the flick. Note: The ...

http://randulphira2847.livejournal.com/1638.html (Cached) 0 links
Published: 5 months, 2 weeks ago (Thu, 18 Jun 2009 17:46:21 PDT); 2186 bytes

randulphira2847

?????? ???? ??? ????

$ jirb irb(main):001:0> "РАК".downcase => "\320\240\320\220\320\232" irb(main):002:0> "РАК" => "\320\240\320\220\320\232" irb(main):003:0> "CANCER".downcase => "cancer"

http://gridycat.livejournal.com/252803.html (Cached) 0 links
Published: 6 months, 3 weeks ago (Mon, 11 May 2009 01:54:55 PDT); 235 bytes

gridycat

An Educational Converter Program

..., "mm"=>Distance, "m" => Distance, "ml"=> Volume, "l"=>Volume, "gal"=>Volume, "g"=>Mass, "kg"=> Mass, "Nm"=>Distance, "km"=>Distance} def abbrev @cached_abbrev||=Unit::NameToTag[downcase.match(/(.*[^s])s?$/)[1]]||self end def cf(to_unit) #gives a conversion factor appropriate to go from our unit to the to_unit. sa=self.abbrev ua=to_unit.abbrev cf_map=Unit::UnitToType[sa] ...

http://suryastra.livejournal.com/86990.html (Cached) 0 links
Published: 1 year ago (Tue, 02 Dec 2008 16:34:42 PST); 4022 bytes

suryastra

	Home \| Journal tools \| Personal search form \| My account \| Bookmark \| FAQ \| Contact

Downcase

Today's amusement - a HTTP 1/1 client in scsh :P

query-replace-regexp or `` doing movies gratifying ''

?????? ???? ??? ????

An Educational Converter Program