open (CELLNUM, "/usr/local/share/dailystats/.cellnum") or die "Cant open Cell num file: $!\n"; open (CELLNUM2, ">/usr/local/share/dailystats/.cellnum") or die "Cant open Cell num file: $!\n"; $cellnum = ; $cellnum++ print CELNUM2 "$cellnum"; close CELNUM; close CELNUM2;