from_to($menu_files[0], 'ISO-8859-7', 'UTF-8') if @menu_files >= 1;
from_to($menu_files[1], 'ISO-8859-7', 'UTF-8') if @menu_files >= 2;
from_to($menu_files[2], 'ISO-8859-7', 'UTF-8') if @menu_files >= 3;
from_to($menu_files[3], 'ISO-8859-7', 'UTF-8') if @menu_files >= 4;
die("Need more!") if @menu_files >= 5;

##</code><code>##

sub from_to_multi {
   my $fr = shift;
   my $to = shift;
   from_to($_, $fr, $to) for @_;
}

from_to_multi('ISO-8859-7', 'UTF-8', @menu_files);