@fileinput_ap = <AP_MENU>;
for ($i = 0; $i <= $#fileinput_ap; $i++)  { print "$fileinput_ap[$i]" }