open (REPORT, ">>$REPORTNAME") or die ("Cannot open");  # Open the report file for writing