defined ($_) && print FLE $_, $/ for @file;