copy "file1", $fh

##</code><code>##

if (true) {
    open (my $fh, ">> RESULT_LOG");
    open BATTERY, "<Battery_Status";
    print $fh <BATTERY>;
    close BATTERY;
}
else {print "Error"}