open($self->{FILE}, ">>$self->{file_path}$self->{file_name}") || die "Could not open file $!\n";

##</code><code>##

my $self = {};

open($self->{FILE}, ">> text.txt") || die "Could not open file : $!\n";
my $fh = $self->{FILE};
print $fh "some text here\n";
close($self->{FILE});