Help for this page
#write data to file $logfile = $path.$pg; open (LOG1, ">>, $logfile") or die "Can't open logfile: $!"; print LOG1 "$when\n"; close (LOG1) or die "Can't close logfile: $!";
open (LOG1, ">>", $logfile) or die "Can't open logfile: $!"; open (LOG1, ">> $logfile") or die "Can't open logfile: $!"; open (LOG1, ">>$logfile") or die "Can't open logfile: $!";