Watch out for that comparison you do!

$a = $b;    # assigns the value of $b to $a
$a == $b;   # compares the two numerically
[download]

Note that your code won't fail compiling (aside from the already answered sub issues ;-)) but it won't do what you expect it would.

janx