Adriano Ferreira's Home Page

I am a Brazilian programmer. I program Java for a living. I program Perl for fun. I hope that in no time I earn my living while having fun: make the cake and eat it.

My new year's resolution for 2005 is to start releasing some of the code I wrote and which can be useful occasionally. That was the purpose of this page from the beginning. However I felt myself missing the appropriate resources (time, brain, etc.) until now.

These are the programming languages I'm interested in:

• Perl (http://www.perl.org/)
• Python (http://www.python.org/)
• Ruby (http://www.ruby-lang.org/)
• Lua (http://www.lua.org/)
• Objective C
• JavaScript (just a little bit)

To make my point that I have not learnt anything despite my efforts in so many programming languages, here are some pieces of disgruntled wisdom:

• Lua Bit #1
• Perl Bit #1
• Perl Bit #2
• Perl Bit #3
• Java Bit #1
• Objective-C Bit #1

  use XML::Simple;
  my $xml = XMLin('any.xml');
  use YAML;
  print Dump($xml);

local f, e = io.open(filename)
local t = dofile(conf)
 
local line
for line in f:lines() do
  line = string.gsub(line, 
            '$%(([%w_]+)%)', 
            function(a) return t[a] end)
  io.stdout:write(line, "\n")
end