open(FILE_HANDLE, ">>", "$filename") || die "ACK, GASP: $error_message\n";
my @data = <FILE_HANDLE>;
chomp(@data);
close FILE_HANDLE;