A collection of my submissions to http://golf.shinh.org/.
Each are as-is post mortem, therefore most could be improved.
echo(toupper a{~c)(c=:I.'#'=stdin'')}a=:433$LF,~30$'helloworld'
$<.bytes{|b|putc ($/+"helloworld"*3)[$.%31]-b[0]*32;$.+=1}
$<.bytes{|b|putc ($/+"helloworld"*3)[($.+=1)%31].ord-b[0]*32}
20.times{|n|puts (("%20s".%"1"*-~n).chars.rotate(-$.+=n+1)*'').rstrip}
(a=[(c="Happy birthday")+" to you"]*4)[gets.to_i-1]=c+" dear anagol"
$><<a*",
"+"!"
wd&>'Hello, World!';(,.i.10);1!:1]3
puts"Hello, World!",[*0..9],*$<
puts"Hello, World!",*0..9,*$<
a=eval *$<
0while a[p~-$.+=a[~-$.]]
$<.map{|a|9.times{|c|a[c]>90&&putc('CHRISTMAS'[c])};puts}
$<.map{|a|9.times{|c|a[c]>?Z&&$><<'CHRISTMAS'[c]};puts}
$<.bytes{|c|$.+=-c%45-1;(0..6)===$.?$><<'0*12345'[$.]:break}
xnor=.=
wd@".;._1(,stdin)LF
(wd@#~"+96|3&u:)1!:1]3
$<.chars{|c|puts c.*c[0]%96}
$<.bytes{|c|puts c.chr.*c%96}
wd'cya'42 69}100 3$'bye'
s=[:bye]*100
s[42]=s[69]=:cya
puts s