joaomilho

palindromo = "raiar"
palindromo == palindromo.reverse

joaomilho

O Facebook apresentou, na quarta-feira (1º), os documentos aos órgãos regulatórios para fazer uma oferta inicial de ações (o chamado IPO), prevista para maio, em que espera arrecadar US$ 5 bilhões. A expectativa do mercado é que o IPO seja o maior para uma empresa de internet, superando o de US$ 2 bilhões do Google, feita em agosto de 2004.

De acordo a estimativa de analistas, depois que as ações da empresa começarem a ser negociadas com o IPO, o valor de mercado da empresa pode chegar a um patamar entre US$ 75 bilhões e US$ 100 bilhões, o que colocaria o Facebook na sétima posição entre as empresas do setor de tecnologia das Américas, atrás dos gigantes Apple, Microsoft e IBM.

Na opinião de alguns especialistas, essa previsão de valor de mercado é exagerada. Se a estimativa se confirmar, no entanto, a empresa ainda deverá valer pouco mais de "meio Google": de acordo com levantamento feito pela consultoria Economatica a pedido do G1, a empresa de Larry Page e Sergey Brin encerrou o mês de janeiro valendo US

joaomilho

Url: https://svcs.sandbox.paypal.com/AdaptivePayments/Pay

Headers: {"X-PAYPAL-REQUEST-DATA-FORMAT"=>"XML", "X-PAYPAL-RESPONSE-DATA-FORMAT"=>"JSON", "X-PAYPAL-SECURITY-USERID"=>"...", "X-PAYPAL-SECURITY-PASSWORD"=>"...", "X-PAYPAL-SECURITY-SIGNATURE"=>"...", "X-PAYPAL-APPLICATION-ID"=>"APP-80W284485P519543T", "X-PAYPAL-DEVICE-IPADDRESS"=>"127.0.0.1"} 

Request:
<?xml version="1.0" encoding="UTF-8"?>
<PayRequest>
  <requestEnvelope>
    <detailLevel>ReturnAll</detailLevel>
    <errorLanguage>en_US</errorLanguage>

joaomilho

merge [] ys = ys
merge xs [] = xs
merge (x:xs) (y:ys) = if x <= y
                      then x : merge xs (y:ys)
                      else y : merge (x:xs) ys

mergesort [] = []
mergesort [x] = [x]
mergesort xs = let (as, bs) = splitAt (length xs `quot` 2) xs
               in merge (mergesort as) (mergesort bs)

joaomilho

"The black man, white man, has got no music of their own.
  Music belongs to the universe."
  - Rufus Thomas

1. The Meters - Look-Ka Py Py
http://grooveshark.com/#!/album/Look+Ka+Py+Py/3669718

2. Funkadelic - Maggot Brain
http://grooveshark.com/#!/album/Maggot+Brain/124909

joaomilho

# LiquidView is a action view extension class. You can register it with rails
# and use liquid as an template system for .liquid files
#
# Example
# 
#   ActionView::Base::register_template_handler :liquid, LiquidView
class LiquidView
  PROTECTED_ASSIGNS = %w( template_root response _session template_class action_name request_origin session template
                          _response url _request _cookies variables_added _flash params _headers request cookies
                          ignore_missing_templates flash _params logger before_filter_chain_aborted headers )

joaomilho

# Creation of a payment

client = Pagosonline::Client.new(merchant_id: 123, account_id: 123, login: 'foo', key: 'foo')
client.payment reference: '...', description: '50COP Donation', amount: 1000, currency:  "COP", response_url: 'http...', confirmation_url: 'http:...', language: 'es'

joaomilho

joaomilho

import Char
r = flip mod
b [l] = l
b l = b $ map (\x -> read [x]) $ show $ sum l
s = b . map ((+1) . r 9 . r 97 . ord . toLower) . filter isAlpha

main = do
  x <- getLine
  putStr $ show $ s x

joaomilho

# Generator for valid Swedish personnummer: http://en.wikipedia.org/wiki/Personal_identity_number_(Sweden)
# By Henrik Nyh <http://henrik.nyh.se> 2009-01-29 under the MIT license.

require 'date'

module Personnummer

  def self.generate(date=nil, serial=nil)
    date ||= Date.new(1900+rand(100), 1+rand(12), 1+rand(28))
    serial = serial ? serial.to_s : format("%03d", 1+rand(999))  # 001-999