open my $fout, '>', $dynamic or die "Failed to open >$dynamic<: $!\n";