open(my $fh,'/full/path/to/file/data4.txt') or die "Could not open file [$!]";