Original source downloaded from Vintage Basic

Conversion to Perl

I used List::Util to do all the heavy work to show that perl can handle all the various array functions. It would be interesting to see a version that handled all of this manually as there ended up being very little code left in this program.