Help for this page

Select Code to Download

Select or download this

open LIST, '>>', '/opt/btb_webservice/ver3/lease_list.txt' or die "/op
+t/btb_webservice/ver3/lease_list.txt: $!";
print LIST join(' ',$date,$client_ip,$client_mac,$master_ip),"\n" or d
+ie "/opt/btb_webservice/ver3/lease_list.txt: $!";
close LIST or die "/opt/btb_webservice/ver3/lease_list.txt: $!";