or download this
#!/usr/bin/perl
...
return;
}
<p><b>update 2</b> After reading the other replies I realized I misrea
+d the question, and there was no need for recursion, so the solution
+came to be more complex than it needed to be. I was really in the nee
+d to get some sleep.</p>