in reply to CMD says files is closed when It should be open

DATA is a reserved filehandle. Use a better filehandle name, or, even, use a lexical filehandle:
open my $FH, '<', $data or die "Cannot open $data: $!";

[download]
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

In Section Seekers of Perl Wisdom