Heh... I'm having fun converting an algorithm to calculate FFTs and IFFTs to Perl.
The original version is in Basic and it is VERY badly written. Even for Basic.
Guess how fun is it to convert something where each line introduces a new variable and each variable is named 'L', 'M', 'M1', 'M2', 'U1..4', 'T1..4', etc.
Oh! There are those "nice" GOTOs and loops.
It's becoming valid Perl and there are 16 lines missing.
My next step is to search CPAN for something to calculate FFTs and IFFTs.
Aren't all engineers crazy?