Help for this page
use strict; use warnings;
local *FH; open (FH, ...) or die; $files{$ffc} = *FH;
open ($files{$ffc}, ...) or die;