I don't know how it should work, but on my pc (debian with perl-5.10.1) behaves in a strange way.

When I start the script:

.-------------------------------------------------------------------.
 |   | 4) Sandwiches
'-------------------------------------------------------------------'
Item number (1-4, 0 to restart, 'q' to quit)?
[download]

If I press '1':

.-----------------------------------------------------------------.
    |3) French Toast
   |                     |                     |
'-----------------------------------------------------------------'
Item number (1-4, 0 to restart, 'q' to quit)?
[download]

'2'

.------------------------------------------------.
                      |ese
                                |
                 |ese Casserole
               |nd Rice Casserole
                         |
 | 6) Fusilli with Fresh Tomato and Olive Sauce
      |enne With Eggplant, Olives and Feta
                          |
                            |
 |10) Soba Noodles with Spicy Tofu Peanut Sauce
                        |
                           |
'------------------------------------------------'
Item number (1-12, 0 to restart, 'q' to quit)?
[download]

'3'

.------------------------------------------------------.
         |Greens, Pear, Almond and Feta Salad
                                    |
                      |aco Salad
       |ed Green Salad with Strawberry Dressing
 |5) Mixed Lettuces with Reduced Balsamic Vinaigrette
 |6) Quinoa Salad with Pistachios and Dried Pineapple
    |Radish and Tomato Salad with Yoghurt Dressing
                                       |
'------------------------------------------------------'
Item number (1-8, 0 to restart, 'q' to quit)?
[download]

'4'

.--------------------------------------------------------------------.
 |1) Chicken and Sun-Dried Tomato Sandwiches with Basil Olive Pesto
                                                      |
                                            |
                                                   |
'--------------------------------------------------------------------'
Item number (1-4, 0 to restart, 'q' to quit)?
[download]

The recipes are shown correctly. I guess this isn't the correct behaviour but I don't know what causes this, any idea?

Anyway, if you can make it work, I think it could fit well in CPAN in the form of a module.