Comments on: Code Golf http://blog.bogojoker.com/2007/03/code-golf/ 'My humble abode'.sub(/ab/,'c') Wed, 28 Sep 2011 09:09:16 +0000 hourly 1 http://wordpress.org/?v=3.2.1 By: Joseph Pecoraro http://blog.bogojoker.com/2007/03/code-golf/comment-page-1/#comment-7 Joseph Pecoraro Wed, 28 Nov 2007 15:56:43 +0000 http://bogojoker.com/weblog/2007/03/18/code-golf/#comment-7 Here were my solutions: The down and dirty. Choose a random character from an array of numbers and upper and lower letters. Do this however many times it is necessary: <code>$p.=(0..9,'A'..'Z','a'..'z')[62*rand]for 1..pop;print$p,$/</code> This is what I consider my neat solution. It generates a random ASCII character out of the first 122 ASCII characters (z is 122). If that character matches the regular expression (looking for a number or a letter) then we add it to our string. If it was a bad guess we reloop. This is not deterministic but its a really cool solution: <code>$_=chr 123*rand,/[\da-z]/i?$a.=$_:redo for 1..pop;print$a,$/</code> Here were my solutions:

The down and dirty. Choose a random character from an array of numbers and upper and lower letters. Do this however many times it is necessary:
$p.=(0..9,'A'..'Z','a'..'z')[62*rand]for 1..pop;print$p,$/

This is what I consider my neat solution. It generates a random ASCII character out of the first 122 ASCII characters (z is 122). If that character matches the regular expression (looking for a number or a letter) then we add it to our string. If it was a bad guess we reloop. This is not deterministic but its a really cool solution:
$_=chr 123*rand,/[\da-z]/i?$a.=$_:redo for 1..pop;print$a,$/

]]>